Program Product 


Licensed Material — Property of IBM 
LY20-2339-2 


Time Sharing Option 
3270 Display Support 
and Structured 
Programming Facility 
Version 2.2:| 

Program Logic Manual 


Program Number 5740-XT8 


The Structured Programming Facility/Time Sharing Option 
is a program development tool designed to take advantage 
of the characteristics of IBM 3270 display terminals and to 
increase productivity in the Time Sharing Option environ- 
ment for users of both structured and conventional pro- 
gramming techniques. 


This document describes the internal logic, program 
structure, and data areas. It is intended for those who 
change and maintain this program product. 


Third Edition (October 1979) 
This edition is a major revision obsoleting LY20-2339-1. 


This edition applies to Version 2, Release 2, Modification Level 1, of the program product 
TSO-3270 Display Support and Structured Programming Facility (5740-XT8) and to all 
subsequent versions and modifications until otherwise indicated in new editions or 
Technical Newsletters. 


Changes are continually made to the information herein. Therefore, before using this 
publication, consult your System/370 Bibliography (GC20-0370) for the editions that 
are applicable and current. 


References in this publication to IBM products, programs, or services do not imply that 
IBM intends to make these available outside the United States. 


Requests for copies of IBM publications should be made to your IBM representative or 
to the IBM branch office serving your locality. 


A form for readers’ comments has been provided at the back of this publication. If 
this form has been removed, address comments to:: IBM Corporation, Technical 
Publications, Dept. 824, 1133 Westchester Avenue, White Plains, New York 10604. 
IBM may use or distribute any of the information you supply in any way it believes 
appropriate without incurring any obligation whatever. You may, of course, continue 
to use the information you supply. 


© Copyright International Business Machines Corporation 1977, 1978, 1979 


PREFACE 


THIS MANUAL DESCRIBES THE FUNCTIONS AND LOGIC OF INTERNAL OPERATIONS, 
PROGRAM STRUCTURE AND CONTROL FLOW, DATA FLOW, AND DATA AREAS OF SPF/TSO 
VERSION 2, RELEASE 2, MODIFICATION LEVEL 1 (SPF 2.2.1). IT IS INTENDED 
FOR SYSTEMS PROGRAMMING PERSONNEL WHO NEED TO MODIFY THE DISTRIBUTED 
VERSION OF THE PROGRAM. 


THE MANUAL IS ORGANIZED INTO FIVE MAJOR SECTIONS, AS FOLLOWS: 


SECTION 1. INTRODUCTION - 
INCLUDES GENERAL INFORMATION ABOUT THE SPF OPERATING 
ENVIRONMENT, PHYSICAL CHARACTERISTICS, TASK STRUCTURE, 
AND SPF DATA SETS. 


SECTION 2. METHOD OF OPERATION - 
DESCRIBES THE LOGIC AND DATA FLOW IN SUFFICIENT DETAIL 
FOR THE READER TO BE ABLE TO IDENTIFY THE SPF MODULE 
WHICH PERFORMS A PARTICULAR OPERATION. 


SECTION 3. PROGRAM ORGANIZATION - 
DESCRIBES THE OVERALL PROGRAM STRUCTURE AND LISTS 
PERTINENT INFORMATION ABOUT EACH MODULE, INCLUDING 
INTERFACE REQUIREMENTS. 


SECTION 4. DIRECTORY - 
CONTAINS CROSS-REFERENCE INFORMATION BY OBJECT MODULE, 
SUMMARIZING USAGE OF SPF COMMON SUBROUTINES, MENUS, 
MESSAGES, AND SVC ROUTINES. 


SECTION 5. DATA AREAS - 


SHOWS THE FORMAT AND CONTENTS OF MAJOR SPF TABLES 
AND CONTROL BLOCKS. 


RELATED PUBLICATIONS 


THE READER SHOULD BE FAMILIAR WITH THE FOLLOWING PUBLICATIONS: 
/TsO_P RAM REFERENCE MANUA $H20-1975- 
THIS MANUAL PROVIDES A DETAILED DESCRIPTION ON HOW TO USE SPF. 


Ly ie INCLUDES SEVERAL EXAMPLES OF SPF USAGE AND A SAMPLE 


SPE/TSO INSTALLATION AND CUSTOMIZATION GUIDE, SH20-2402-0 


THIS MANUAL PROVIDES INFORMATION ON HOW TO INSTALL AND CUSTOM 
TAILOR SPF. 


FOR ADDITIONAL DETAIL ABOUT SPF PROGRAMS AND DATA AREAS, THE READER 


SHOULD CONSULT THE PL“S COMPILER AND ASSEMBLER OUTPUT LISTINGS WHICH ARE 
AVAILABLE ON MICROFICHE CLYBO0-2481-0). 
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THIS SECTION CONTAINS GENERAL INFORMATION ABOUT THE SPF OPERATING 
ENVIRONMENT, PHYSICAL CHARACTERISTICS, TASK STRUCTURE, AND DATA SETS. 
THE SECTION IS ORGANIZED AS FOLLOWS: 


PROGRAM OVERVIEW 
PROGRAMMING SYSTEMS 
MACHINE CONFIGURATIONS 
TERMINALS 

PHYSICAL CHARACTERISTICS 
TASK STRUCTURE 

DATA SET USAGE 

DATA SET NAMES 

DATA SET ATTRIBUTES 
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PROGRAM OVERVIEN 


SPF IS A PROGRAMMING AID THAT OPERATES IN THE TIME SHARING OPTION (TSO) 
ENVIRONMENT AND IS DESIGNED TO INCREASE PRODUCTIVITY IN DEVELOPING AND 
MODIFYING PROGRAMS. 


SPF SUPPORTS BOTH STRUCTURED AND CONVENTIONAL PROGRAMMING TECHNIQUES. 
IT CAN BE USED EITHER BY AN INDIVIDUAL PROGRAMMER, OR BY MANY 
PROGRAMMERS WORKING TOGETHER ON A PROJECT. THE PRIMARY FUNCTIONS THAT 
IT PROVIDES INCLUDE: 


-- FULL SCREEN, CONTEXT EDITING WHICH ALLOWS MULTIPLE LINES TO BE 
MODIFIED IN A SINGLE INTERACTION. 


-- FORWARD, BACKWARD, AND SIDEWAYS SCROLLING OF SOURCE CODE OR 
OUTPUT LISTINGS. 


~~ SPLIT SCREEN, ALLOWING TWO SPF FUNCTIONS TO BE PERFORMED 
INDEPENDENTLY ON THE SAME DISPLAY TERMINAL. 


-- ALLOCATION AND MAINTENANCE OF PROGRAMMING LIBRARIES, AUTOMATIC 
COLLECTION OF LIBRARY ACTIVITY STATISTICS, AND PRINTING OF 
LIBRARY CONTENTS. 


~~ INTERFACE WITH STANDARD LANGUAGE PROCESSORS FOR EXECUTION IN THE 
FOREGROUND OR BACKGROUND. 


~~ ONLINE TUTORIAL FOR INSTRUCTION AND REFERENCE. 


PROGRAMMING SVSTEMS 


SPF OPERATES AS A TSO COMMAND PROCESSOR UNDER THE TIME SHARING OPTION OF 
VS2 RELEASE 1.7 (SVS), OR VS2 RELEASE 3.7 OR 3.8 (MVS). SPF IS WRITTEN 
IN PL“S AND TRANSLATED INTO OS/VS ASSEMBLER LANGUAGE. THE BPAM AND 

BSAM ACCESS METHODS ARE EMPLOYED BY SPF FOR READING AND WRITING DATA 
SETS, AND THE FACILITIES OF TSO/TCAM OR TSO/VTAM ARE USED FOR READING 
AND WRITING THE DISPLAY. 


SPF PROVIDES INTERFACES TO THE FOLLOWING IBM PRODUCTS: 
SYSTEM ASSEMBLER (SUPPLIED WITH OS/VS2) 


OS“’VS COBOL COMPILER 5740-CBl 
FORTRAN IV Gl COMPILER 5734-F02 
PL“I CHECKOUT COMPILER 5734-PL2 
PL/I OPTIMIZING COMPILER 5734-PL1 
LINKAGE EDITOR (SUPPLIED WITH OS/VS2) 
COBOL INTERACTIVE DEBUG (FOREGROUND ONLY) 5734-CB4 
FORTRAN INTERACTIVE DEBUG CFOREGROUND ONLY 5734-F05 
TSO ASSEMBLER PROMPTER CFOREGROUND ONLY) 5734-CP2 
TSO COBOL PROMPTER CFOREGROUND ONLY). 5734-CP1 
TSO FORTRAN PROMPTER CFOREGROUND ONLY) 5734-CP3 
DOCUMENT COMPOSITION FACILITY (SCRIPT/VS) 5748-XX9 
WITH THE FOREGROUND ENVIRONMENT FEATURE 
OS/VS2 MVS 3270 EXTENDED DISPLAY SUPPORT - 5740-XE2 
SESSION MANAGER, RELEASE 2 
TSO/TCAM COMMAND PROCESSOR "DSPRINT®™ 5798-AYF 
TSO/VTAM DATA SET PRINT (CDSPRINT) 5798-CPF 
TSO/VS2 PROGRAMMING CONTROL FACILITY (PCF) 5798-BBJ 


TSO PROGRAMMING CONTROL FACILITY —- II (CPCF2) 5798-CLW 
ALL THE PROGRAM-NUMBERED PRODUCTS LISTED ABOVE CAN BE ORDERED SEPARATELY 


UNDER IBM LICENSING AGREEMENTS. NONE OF THE ABOVE PRODUCTS ARE 
DISTRIBUTED AS PART OF SPF. 
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MACHINE CONFIGURATION 


THE COMPUTER SYSTEM REQUIREMENTS ARE THE SAME AS NEEDED FOR OS/VS2 WITH 
THE TIME SHARING OPTION (TSO). 


THE STORAGE REQUIREMENTS FOR THE USER REGIONS WILL VARY DEPENDING UPON 
THE SIZE OF THE DATA SETS BEING EDITED AND THE EXTENT THAT "SPLIT 
SCREEN” WILL BE USED. THE SPF PROGRAMS ARE REENTERABLE AND SHOULD BE 
PLACED IN THE SYSTEM LINK PACK AREA. THIS WILL REDUCE THE SIZE 
REQUIREMENT FOR THE USER REGIONS AND SHOULD ALSO IMPROVE PERFORMANCE. 


THE FOLLOWING MINIMUM REGION SIZES ARE SUGGESTED FOR SVS. THESE SIZES 
MAY HAVE TO BE EXPANDED IF LARGE CODE SEGMENTS ARE TO BE EDITED. 


256K ~ IF SPF RESIDES IN THE LINK-PACK AREA 
512K - IF SPF DOES NOT RESIDE IN THE LINK-PACK AREA 


TERMINALS 


SPF SUPPORTS THE FOLLOWING IBM 3270 DISPLAY STATIONS: 


3275 MODELS 2 AND 12 

3276 MODELS 2, 3, 4, 12, 13, AND 14 

3277 MODEL 2 (LOCAL OR REMOTE ATTACHMENT) 

3278 MODELS 2, 3, AND 4 (LOCAL OR REMOTE ATTACHMENT) 


THE FOLLOWING KEYBOARDS ARE SUPPORTED: 
FOR 3275 OR 3277 DISPLAY STATIONS: 


78 KEY OPERATOR CONSOLE CFEATURE 4632) 

78 KEY EBCDIC TYPEWRITER (FEATURE 4633) 

78 KEY ASCII TYPEWRITER CFEATURE 4635) 

78 KEY EBCDIC TYPEWRITER/APL (CFEATURE 4638), APL SWITCH OFF 


FOR 3276 OR 3278 DISPLAY STATIONS: 


75 KEY EBCDIC TYPEWRITER CFEATURE 4621) 

75 KEY ASCII TYPEWRITER CFEATURE 4624) 

87 KEY EBCDIC TYPEWRITER CFEATURE 4627) 

87 KEY ASCII TYPEWRITER CFEATURE 4628) 

87 KEY EBCDIC TYPEWRITER/APL CFEATURE 4626), APL SWITCH OFF 
87 KEY EBCDIC TYPEWRITER/TEXT CFEATURE 4629), TEXT SWITCH OFF 


THE STANDARD CHARACTER SET €94 GRAPHICS PLUS BLANK AND NULL) IS 
SUPPORTED ON 3276 AND 3278 DISPLAY STATIONS. 


THE FOLLOWING ARE SUPPORTED, BUT NOT REQUIRED: 


AUDIBLE ALARM CFEATURE #1090) 
IBM 3284, 3286, 3287, 3288, AND 3289 PRINTERS 
PRINT DUAL-CASE CHARACTER SET C(CRPQ #8K0366) 


THE IBM 3284, 3286, 3287, 3288, AND 3289 PRINTERS, IF USED, ARE 
SUPPORTED VIA THE "DSPRINT™ TSO COMMAND PROCESSOR, WHICH MUST BE 
INSTALLED IF SPF OUTPUT IS DIRECTED TO ONE OF THESE PRINTERS. 


PHYSICAL CHARACTERISTICS 


SPF IS COMPRISED OF 30 REENTERABLE LOAD MODULES AND 1 NON-REENTERABLE 
LOAD MODULE. THESE LOAD MODULES ARE BUILT FROM 156 OBJECT MODULES. THE 
OBJECT MODULES ARE ARE DISTRIBUTED ON TAPE IN SMP INSTALLABLE FORMAT AND 
MUST BE LINK EDITED TO CREATE THEIR RESPECTIVE LOAD MODULES. IT IS 
RECOMMENDED THAT MOST OF THE LOAD MODULES BE COPIED TO THE SYSTEM LINK 
PACK AREA (DATA SET ‘SYSI.LPALIB'). SEE THE INSTALLATION AND 
CUSTOMIZATION GUIDE FOR MORE INFORMATION. 
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TASK S$ CTUR 


THE SPF TASK STRUCTURE IS SHOWN IN FIGURE 1.1. THE SPF MAIN CONTROLLER 
IS ATTACHED BY TSO WHENEVER THE USER ENTERS THE "SPF" COMMAND. THE MAIN 
CONTROLLER PERFORMS INITIALIZATION/TERMINATION FUNCTIONS AND HANDLES 
DISPLAY I70 (VIA TCAM OR VTAM) ON BEHALF OF THE OTHER SPF PROGRAMS. IT 
ATTACHES THE PROCESSOR MAIN DRIVER, WHICH DISPLAYS THE PRIMARY OPTION 
MENU AND LINKS TO ONE OF SEVERAL PROCESSING PROGRAMS, DEPENDING ON THE 
OPTION SELECTED. 


IF THE USER ENTERS SPLIT SCREEN MODE, THE MAIN CONTROLLER AGAIN 
ATTACHES THE PROCESSOR MAIN DRIVER TO HANDLE OPERATIONS ON THE SECOND 
LOGICAL SCREEN. THUS, IN SPLIT SCREEN MODE THREE TASKS ARE ACTIVE: 


SPF CONTROL TASK 
SPF PROCESSING TASK FOR LOGICAL SCREEN 1 
SPF PROCESSING TASK FOR LOGICAL SCREEN 2 


THE WAIT/POST LOGIC BETWEEN THE CONTROL TASK AND EITHER OF THE 
PROCESSING TASKS IS SHOWN IN FIGURE 1.2. AFTER THE CONTROL TASK 
ATTACHES A PROCESSING TASK, IT WAITS FOR EITHER OF TWO EVENT CONTROL 
BLOCKS CECB'S) TO BE POSTED: 


1. DISPLAY REQUEST ECB 
2. TASK COMPLETION ECB 


WHEN A PROCESSING TASK WANTS THE CONTROL TASK TO PERFORM DISPLAY I20 OR 
SOME OTHER FUNCTION, IT POSTS THE DISPLAY REQUEST ECB (ECB #1) WITH ONE 
OF THREE SPECIAL CODES AND ISSUES A WAIT ON: 


3. PROCESS REQUEST ECB 
THE THREE TYPES OF DISPLAY REQUESTS ARE: 


1. NORMAL FULL SCREEN I/70 ~- THIS REQUEST IS USED WHEN A PROCESSING TASK 
WANTS TO DO NORMAL SPF DISPLAY I70. 


IN RESPONSE TO A DISPLAY REQUEST, THE CONTROL TASK: 
- WRITES INFORMATION TO THE TERMINAL CTPUT), 
- WAITS FOR A RESPONSE FROM THE USER CTGET), 
~- POSTS THE PROCESS REQUEST ECB CECB #3), AND 
~ WAITS FOR DISPLAY REQUEST OR COMPLETION OF THE PROCESSING TASK. 


PROCESSING PROGRAMS GENERALLY CALL THE COMMON DISPLAY SUBROUTINE, 
CDISPL», TO PERFORM THE POST-WAIT SEQUENCE. 


2. LINE I70 - THIS REQUEST IS USED WHEN A PROCESSING TASK WANTS TO ENTER 
STANDARD TSO LINE I/70 MODE. 


IN RESPONSE TO A LINE I/O REQUEST, THE CONTROL TASK: 
- CLEARS PART OF THE SCREEN AND SETS THE LINE COUNT, 
~- POSTS THE PROCESS REQUEST ECB CECB #3), AND 
- WAITS FOR DISPLAY REQUEST OR COMPLETION OF THE PROCESSING TASK. 


3. COMMON CONTROL INTERFACE ~- THIS REQUEST IS USED WHEN A PROCESSING 
TASK WANTS TO EXECUTE A COMMON SUBROUTINE UNDER THE CONTROL TASK'S 
TCB. 


IN RESPONSE TO A COMMON CONTROL INTERFACE REQUEST, THE CONTROL TASK: 
- CALLS THE COMMON SUBROUTINE, 
- POSTS THE PROCESS REQUEST ECB CECB #33, AND 
- WAITS FOR DISPLAY REQUEST OR COMPLETION OF THE PROCESSING TASK. 


WHEN A PROCESSOR TASK COMPLETES CEITHER NORMALLY VIA END FUNCTION 
REQUEST, OR ABNORMALLY DUE TO AN ABEND), THE TASK COMPLETION ECB IS 
POSTED (CECB #2). FOR ABNORMAL COMPLETION, THE CONTROLLER RE-ATTACHES 
THE PROCESSOR TASK. FOR NORMAL COMPLETION, THE CONTROLLER TERMINATES 
SPLIT SCREEN MODE CIF IT WAS IN EFFECT), OR TERMINATES SPF. 
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SYSTEM TASK SPF CONTROL TASK SPF PROCESSING TASK(S) 


2ND 
(SP 


SS ary | 
TSO ss BSS=SSSSS=SS=SS= => SPF ssssssssssss==p PROCESS 


TERMINAL MAIN MAIN 
MONITOR CONTROLLER 


DRIVER 
LEGEND: 9 ======> ATTACH 
——> LINK 
FIGURE 1.1 SPF TASK STRUCTURE 
SPF CONTROL TASK SPF PROCESSI 


INITIALIZE SPF 


ATTACH PROCESSOR ssasssssessEfSersessre=ss===p> FORMAT D 
| OUTPUT 
WAIT --7------ b> | DISPLAY 
| REQ. ECB | d----- 
COMPLE 
t------ > | TION ECB 
IF DISPLAY REQ: 
TPUT (OUTPUT) 
TGET CINPUT) 
POST ------- b> | PROCESS qd----- 
REQ. ECB | 
IF ABNORMAL COMPL: PROCESS 
RE-ATTACH TASK | AND CONT 
IF NORMAL COMPL: | 
END SPLIT SCREEN ON COMPL 
L-——— posT 
OR RETURN 


TERMINATE SPF 


LEGEND: ==s====> ATTACH 
—- — — Db WAIT/POST 
———> PROGRAM FLOW 


FIGURE 1.2 WAIT/POST LOGIC 
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TASK 
LIT SCRN) 


OR 


SPF PARMS 
BROWSE 

EDIT 
UTILITIES 
FOREGROUND 
BACKGROUND 
TSO COMMAND 
TUTORIAL 


NG TASK 


INPUT 
INUE 


ETION: 
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DATA SET USAG 


THE DATA SETS USED BY SPF ARE SHOWN IN FIGURE 1.3. SOME OF THE DATA 
SETS ARE PERMANENT DATA SETS THAT ARE REQUIRED TO EXECUTE SPF. OTHERS 
ARE TEMPORARY DATA SETS THAT ARE ALLOCATED BY SPF IF THEY ARE REQUIRED. 


THE NAMES SHOWN ARE THE NAMES USED TO REFER TO THESE DATA SETS FOR 
DOCUMENTATION PURPOSES. "TEMPCNTL™ IS SOMETIMES USED GENERICALLY TO 
REFER TO EITHER TEMPCNTL1 OR TEMPCNTL2. LIKEWISE, "TEMPLIST™ REFERS TO 
EITHER TEMPLIST1 OR TEMPLIST2. ACTUAL DATA SET NAMES AND THE FILE NAMES 
TO WHICH THEY ARE ASSIGNED ARE DISCUSSED LATER IN THIS SECTION. 


INPUT 


SPFMENUS ——————_> 
(REQUIRED } 


SPFMSGS ————> 
(REQUIRED ) 


SPFPROCS —————_> 
(REQUIRED ) 


SPFPARMS ————_> 
(REQUIRED ) 


TEMPCNTL1 ————_> 
( TEMPORARY ) 


TEMPLIST! ——————_> 
( TEMPORARY } 


TEMPCNTL2 ——————_> 
(TEMPORARY ) 


TEMPLIST2 ————> 
(TEMPORARY ) 


TEMPEDITA ————> 
(TEMPORARY ) 


TEMPEDIT8s ———_> 
( TEMPORARY ) 


SPF 
PROCESS 


SPF MENU PROTOTYPES 


AND TUTORIAL PAGES 


SPF MESSAGE 
PROTOTYPES 


SPF PROCEDURE 
PROTOTYPES 


SPF USER PARAMETERS 


SPF LOG DATA SET 


SPF LISTING DATA SET 


TEMPORARY CONTROL 
DATA SET 
(LOGICAL SCREEN 1) 


TEMPORARY LISTING 
DATA SET 
(LOGICAL SCREEN 1) 


TEMPORARY CONTROL 
DATA SET 
(LOGICAL SCREEN 2) 


TEMPORARY LISTING 
DATA SET 
(LOGICAL SCREEN 2) 


TEMPORARY EDIT 
RECOVERY DATA SET 
(FIRST USED) 


TEMPORARY EDIT 
RECOVERY DATA SET 
(SECOND USED) 


OUTPUT 


————-> SPFPARMS 


—_———> SPFLOG 


———> SPFLIST 


_————> _ TEMPCNTLI 


——————> ~TEMPLISTL 


——> TEMPCNTL2 


————b> TEMPLIST2 


———> TEMPEDITA 


—_————>  TEMPEDITB 


FIGURE 1.3 SPF DATA SET USAGE 


6 SPF/TSO PROGRAM LOGIC MANUAL 


LICENSED MATERIAL - PROPERTY OF IBM 


SPFMENUS: THIS DATA SET CONTAINS PROTOTYPE MENUS THAT ARE FORMATTED 
FOR THE DISPLAY SCREEN. MENUS CAN BE EASILY EDITED, MAKING 
IT POSSIBLE TO CHANGE THE FORMAT OF A DISPLAY WITHOUT 
PROGRAM CHANGES. INSTALLATIONS MAY ALSO WANT TO CHANGE 
EXISTING MENUS OR ADD NEW MENUS TO BE USED BY FOREGROUND 
(OPTION 4) OR BACKGROUND COPTION 5). 


SPFMSGS: THIS DATA SET CONTAINS PROTOTYPE MESSAGES THAT ARE FORMATTED 
AND USED PRIMARILY AS ERROR, INFORMATION, OR LOG MESSAGES. 
EACH MESSAGE CONSISTS OF A SHORT PORTION (24 CHARACTERS) 
THAT CAN BE DISPLAYED IN THE UPPER RIGHT HAND CORNER OF THE 
SCREEN, AND A LONG PORTION (72 CHARACTERS) THAT CAN BE 
DISPLAYED ON LINE 3 OF THE DISPLAY. 


SPFPROCS: THIS DATA SET CONTAINS PROTOTYPE COMMANDS AND JCL. THE 
PROTOTYPE COMMANDS ARE USED BY THE FOREGROUND OPTION COPTION 
4) IN BUILDING TSO COMMANDS OR CLISTS. PROTOTYPE JCL IS 
USED BY THE BACKGROUND OPTION COPTION 5) IN BUILDING JOB 
STREAMS FOR BACKGROUND EXECUTION. 


SPFPARMS: THIS DATA SET CONTAINS SPF USER INFORMATION TO BE RETAINED 
FROM ONE SESSION TO ANOTHER. IT CONSISTS OF ONE MEMBER FOR 
EACH SPF USER. WHEN A TSO USER FIRST USES SPF, A NEW MEMBER 
IS AUTOMATICALLY CREATED. THEREAFTER, IT IS READ DURING SPF 
INITIALIZATION AND UPDATED DURING SPF TERMINATION. 


SPFLOG: THIS DATA SET CONTAINS LOG MESSAGES WHICH SHOW SIGNIFICANT 
ACTIONS DURING THE SESSION. THE USER CAN CONTROL WHETHER OR 
NOT A LOG DATA SET IS TO BE CREATED (OPTION 0.2). SETTING 
THE PRIMARY ALLOCATION TO O WILL ELIMINATE THE OVERHEAD OF 
ALLOCATING, WRITING, AND FREEING THE LOG DATA SET. 


SPFLIST: THIS DATA SET CONTAINS FORMATTED PRINTER OUTPUT REQUESTED BY 
THE USER. ALLOCATION OF A LIST DATA SET CAN BE PREVENTED BY 
AVOIDING THE FOLLOWING OPTIONS THAT WRITE TO SPFLIST: 

- PRINT SCREEN IMAGE PF KEY. 

EDIT AUTOMATIC PRINT CEDIT COMMAND) 

PRINT INDEX LISTING COPTION 3.1 X) 

PRINT ENTIRE DATA SET COPTION 3.1 L) 

PRINT MEMBER COPTION 3.1 P) 

PRINT CATALOG ENTRIES COPTION 3.4 P) 

PRINT VTOC ENTRIES (OPTION 3.7 P) 


TEMPCNTL: THIS TEMPORARY DATA SET CONTAINS CONTROL CARD IMAGES, OR 
UTILITY OUTPUT WHICH HAS BEEN FORMATTED FOR DISPLAY. IT IS 
ALLOCATED THE FIRST TIME IT IS REQUIRED, AND DELETED WHEN A 
LOGICAL SCREEN TERMINATES. OPTIONS THAT USE TEMPCNTL ARE: 
- EDIT (SUBMIT COMMAND) FOR JCL TO BE SUBMITTED 
- BACKGROUND COPTION 4) FOR JCL TO BE SUBMITTED 
- HARDCOPY UTILITY COPTION 3.6 J) FOR JCL TO BE SUBMITTED 
- CATALOG UTILITY COPTION 3.4) FOR IEHLIST OR IDCAMS 
CONTROL CARDS 
VTOC UTILITY COPTION 3.7) FOR DATA TO BE DISPLAYED 
~ TERMINATION (FINAL MENU) FOR JCL TO BE SUBMITTED 


TEMPLIST: THIS TEMPORARY DATA SET CONTAINS LISTINGS THAT HAVE BEEN 
GENERATED BY OS UTILITIES, INVOKED BY SPF. THE LISTINGS ARE 
DISPLAYED ON THE SCREEN. IT IS ALLOCATED THE FIRST TIME IT 
IS REQUIRED, AND DELETED WHEN A LOGICAL SCREEN TERMINATES. 
THE FUNCTION THAT USES TEMPLIST IS: 
- CATALOG UTILITY COPTION 3.4%) FOR IEHLIST OR IDCAMS 
OUTPUT LISTINGS TO BE DISPLAYED 


TEMPEDIT: THIS TEMPORARY DATA SET CONTAINS DATA THAT IS SAVED DURING 
AN EDIT SESSION WHEN YOU HAVE "RECOVERY ON” SPECIFIED. IT 
TIS ALLOCATED THE FIRST TIME YOU CHANGE DATA IN AN EDIT 
SESSION. IT REMAINS ALLOCATED UNTIL YOU TERMINATE SPF. 
THERE ARE TWO DATA SETS C"A™ AND "B™) WHICH ALLOWS YOU TO DO 
RECOVERY PROCESSING IN SPLIT SCREEN MODE. 
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D AME 


THE DEFAULT NAMES THAT ARE USED BY SPF FOR THE VARIOUS DATA SETS ARE: 
*SPF22.M0D1.MENUS* ie: 


SPFMENUS - 

SPFMSGS - ‘'SPF22.M0D1.MSGS* - THE NAMES SHOWN ARE THE 
SPFPROCS - 'SPF22.M0D1.PROCS'* FULLY QUALIFIED DATA SET NAMES. 
SPFPARMS - ‘'SPF22.M0D1.PARMS' == 

SPFLOG am SPFLOG1.LIST Cl) == 

SPFLIST = SPFL.LIST C1) - THE NAMES SHOWN ARE are 
TEMPCNTL - SPFTEMP1.CNTL (2) WITH THE TSO USERID O 

TEMPLIST - SPFTEMP1.LIST (2) PREFIX.USERID 

TEMPEDIT - SPFEDITA.BACKUP (3) -- 


(1) THESE DATA SETS MAY HAVE NUMBERS OTHER THAN "1". 
SPFLOG - SPFLOG4.LIST, SPFLIST - SPF8&.LIST 


(2) THESE DATA SETS WILL HAVE NUMBERS "1" FOR LOGICAL SCREEN 1 AND 
"2" FOR LOGICAL SCREEN 2. FOR EXAMPLE: TEMPCNTL - SPFTEMP2.CNTL 


(3) THESE DATA SETS WILL HAVE CHARACTERS “A™ FOR FIRST USE AND "B" 
FOR SECOND USE. FOR EXAMPLE: TEMPEDIT - SPFEDITA.BACKUP 


FOR EXAMPLE: 


DATA SET ATTRIBUTES 


THE DEFAULT ATTRIBUTES THAT ARE DISTRIBUTED ARE SHOWN BELOW. SOME OF 
THE VALUES ARE REQUIRED AS SHOWN. OTHER VALUES CAN BE CHANGED AT YOUR 
INSTALLATION BY SUPERZAPING THE TSV. STILL OTHERS CAN BE CHANGED BY 


INDIVIDUAL USERS BY USING OPTION 0.2 (LOG/LIST DEFAULT MENU). 


FOR SPF ALLOCATION PARAMETERS 
DATA SET FILE NAME LRECL BLKSIZE RECFM UNITS PRIMARY SECONDARY 
SPFMENUS SPFMENUS 84 3120 VB BLKS 300 40 
SPFMSGS SPFMSGS 76 3120 VB BLKS 36 8 
SPFPROCS SPFPROCS 80 3120 FB BLKS 32 6 
SPFPARMS SPFPARMS 6000C1) 6000¢€1) F BLKS ¥¥*¥(2) ¥¥(C2) 
SPFLOG SPFNNNNN(C3) 125 129 VA PAGES 10 10 
SPFLIST SPFNNNNNC3) 121 3146 FBA PAGES 100 200 
TEMPCNTL SPFNNNNNC3) 80 800 FB BLKS 10 100 
TEMPLIST SPFNNNNNC3) 121 3146 FBA BLKS 10 10 
TEMPEDIT SPFNNNNNC3) 3120 3120 U BLKS 40 200 
(1) SPFPARMS BLOCKSIZE CAN BE INCREASED LARGER THAN 6000 AT 
INSTALLATION TIME. 
(2) SPFPARMS SPACE ALLOCATION SPECIFIED AT INSTALLATION TIME. SEE 


INSTALLATION AND CUSTOMIZATION GUIDE. 


(3) THE VALUE FOR “NNNNN® IS A UNIQUE NUMBER DETERMINED BY SPF AT 


THE TIME OF ALLOCATION. 
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VISUAL TABLE OF CONTENTS 


TSO/SPF 
LOGON 
PROCEOURE 


CHART 1.1 


TSO 
TERMINAL 
MONITOR 
PROSRAM 

CHART 1.2 


OTHER TSO COMMAND PROCESSORS 


SPF CONTROL TASK 


SPF SPF 
DRIVER CONTROLLER 


CHART 1.3 CHART 1.4 


SPF PROCESSING TASK 
PROCESSOR 

MAIN 

DRIVER 


Ct 


CHART 2 


SPF PARMS BROWSE EDIT UTILITIES 


CHART 3 CHART 4 CHART 5 CHART 6 


FOREGROUND BACKGROUND TUTORIAL 


PROCESSING PROCESSING 


CHART 7 CHART 8 CHART 10 
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CHART 4.1 
COMMON SROHSE SUBROUTINE 


LOAD =—s« OBJECT 
EXTENDED DESCRIPTION MODULE = -MODULE - LABEL 


INITIALIZE TABLES, VARIABLES, ETC. SUBROUTINE CBS cBs 
MUST BE CALLED BEFORE CALLING CBR TO SET UP THE CBR10IH 
COMMON BROWSE TABLE (CBT). THE CBT IS GETMAINED 

FROM SUBPOOL 4 VIA SUBROUTINE CSM. 


THE SCREEN IMAGE IS FILLED FROM BROWSE LINE BUFFERS. CBR20FS 
DATA IS-READ INTO THE LINE BUFFERS ON A DEMAND 

BASIS. LOGICAL RECORDS ARE READ A CALL TO CBG 
SUBROUTINE COG IN SUBROUTINE CBG. WHEN THE DISPLAY 

IS COMPLETE, SUBROUTINE CDISPL IS CALLED TO DISPLAY 

THE SCREEN IMAGE. 


IF THE END KEY BAS PRESSED, STEP 6 IS NEXT. SPFSUBS 
OTHERWISE PROCESSING PROCEEDS WITH STEP 4. 


INPUT ON LINE 2 IS ANALYZED. IF A "FIND" COMMAND SPFSUBS 
WAS ENTERED (OR IF THE REPEAT FIND PF KEY WAS 

PRESSED) THE LINE BUFFERS ARE SEARCHED FOR THE 

DESIGNATED CHARACTER STRING. CBG IS CALLED, WHEN 

NECESSARY, TO READ MORE DATA INTO THE LINE BUFFERS. 

IF A "CAPS" OR "ASSIS" COMMAND WAS ENTERED, THE 

INTERNAL MODE INDICATORS ARE UPDATED. IF A "LOCATE" 

COMMAND WAS ENTERED, THE DISPLAYED DATA IS SCROLLED 

TO THE PROPER LINE. PROCESSING PROCEEDS WITH 

STEP 2. 


IF A SCROLL KEY WAS PRESSED, THE NEW STARTING LINE SPFSUBS 
OR COLUMN IS DETERMINED. PROCESSING PROCEEDS WITH 
STEP 2. 


WHEN THE END KEY IS PRESSED, CONTROL IS RETURNED TO SPFSUBS 
THE CALLER. SUBROUTINE CBC MUST BE CALLED AFTER 
CALLING CBR TO CLEAN UP THE CBT. 
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34 


FROM 2 


INPUT 


lL. INITIA 
TABLE 


DATA S 


FROM T 


CONCAT 
DATA S$ 


FROM T 


DATA S$ 
RETURN 


SPF/TSO PROGRAM LOGIC MANUAL 


LIZE EDIT 
(EDT) 
DISPLAY EDIT ___) 
ET MENU 
DATA SET 
| MENU 
INTERPRET RESPONSE 
ERMINAL | 


| 
a 
BUILD/CHECK, ALLOCATE, 


PROCESS 
EDIT I/0 
FUNCTIONS 


CLOSE AND FREE 


wo het be oe m+ mee a 


CHART 5 
EDIT 


PROCESS OUTPUT 


ENATE, AND OPEN 
ETS FOR INPUT 


DISPLAY MEMBER LIST, 
IF REQUESTED MEMBER 
[ SELECTION 


6. INTERPRET RESPONSE 


ERMINAL 


ET(S), AND 


RETURN TO 2 
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eet OS 
# 


a, oe 


CHART 5 
EDIT 
LOAD ~= = = OBJECT 
EXTENDED DESCRIPTION MODULE FODULE LABEL 


THE EDIT TABLE (EDT) IS INITIALIZED. THIS TABLE IS SPFSUBS 
USED FOR COMMUNICATION BETWEEN THE EDIT PROGRAMS. 


SUBROUTINE MHA IS CALLEO TO DISPLAY THE EDIT MENU, SPFSUBS 
AND SUBROUTINE MERR IS CALLED TO DISPLAY AN ERROR OR 
CONFIRMATION MESSAGE FROM THE PREVIOUS PASS THRUOGH 

THE LOOP (IF ANY). INITIAL VALUES FOR PROJECT; 

LIBRARY, TYPE, AND PASSWORD ARE FROM THE ‘KV. 


IF THE END KEY WAS PRESSED, STEP 10 IS EXECUTED 
NEXT. OTHERWISE, PROCESSING CONTINUES WITH STEP 3. 
ENTERED VALUES ARE PLACED BACK IN THE TKV. 


SUBROUTINE CDA IS CALLED TO CONSTRUCT THE DATA SET SPFSUBS 
NAMES (FROM “'PROJECT", UP TO 4 "LIBRARY" NAMES,» AND 

“TYPE') OR VALIDITY CHECK THE NAME (IF “OTHER™ DATA 

SET NAME WAS ENTERED). THE PREVIOUSLY EDITED DATA 

SET(S), IF ANY, ARE CLOSED AND FREED. THE NEW DATA 

SET(S) ARE ALLOCATED (DISP=SHR) AND CONCATENATED IF 
PARTITIONED, OR ALLOCATED (DISP=OLD) IF SEQUENTIAL. 

SUBROUTINE COO IS CALLED TO OPENED THEM FOR INPUT, 

AND THE DATA SET CHARACTERISTICS ARE CHECKED FOR 

VALIDITY. 


STEPS 5 AND 6 ARE EXECUTED ONLY IF THE DATA SET(S) SPFSUBS 
ARE PARTITIONED AND THE MEMBER NAME WAS NOT 

SPECIFIED. SUBROUTINE CML IS CALLED TO DISPLAY THE 

MEMBER LIST. 


IF THE END KEY WAS PRESSED, STEP 2 IS EXECUTED NEXT. | SPFSUBS 
OTHERWISE, PROCESSING CONTINUES WITH STEP 7. 


IF THE DATA SET(S) ARE PARTITIONED, THE BLDL AND SPFSUBS 
FIND SYSTEM SERVICES ARE ISSUED FOR THE SELECTED 

MEMBER. THE EDIT HEADER LINES ARE THEN SET UP AND 

THE EDIT PROCESS ROUTINE EPR IS CALLED TO CONTINUE 

PROCESSING. 


WHEN THE END KEY IS PRESSED, THE DATA SET(S) ARE 
CLOSED AND FREED, AND CONTROL IS RETURNED TO THE 
CALLER (PHD). 
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CHART 5.1 
EDIT 1/0 ROUTINE 


INPUT PROCESS 


1. READ DATA SET 
OR MEMBER 


@. CHECK FOR NUMBER MODE 


EDIT 3 3. PERFORM 

DATA ? EDIT 

SET(S) g FUNCTIONS 
3 
¥ EDIT 
x 4. PROCESS "END", "SAVE", DATA SET 
; OR "CANCEL" 
% SPF LOG 
2 5. PROCESS "CREATE" DATA SET 
& OR "REPLACE" 


6. PROCESS "MOVE" 
OR "COPY" 


RETURN 


RETURN TO 5 
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CHART 5.1 
EDIT 3/0 ROUTINE 


LOAD . OBJECT 
EXTENDED DESCRIPTION MODULE MODULE LABEL 


1. EDIT DATA INPUT (EDI) IS CALLED TO READ IN THE DATA. SPFSUBS 
EACH LOGICAL RECORD IS STORED IN AN EDR CEDIT 
RECORD). THE EDR'S ARE CHAINED TO THE EDIT TABLE. 


IF RECORDS HAVE ASCENDING SEQUENCE NUMBERS, EDIT IS SPF SUBS 
INITIALIZED TO "NUMSER" MODE. OTHERWISE, IT IS 

“NONUM" MODE. AN UPPER/LOKER CASE CHECK IS ALSO 

DONE SO "CAPS" MODE CAN BE SET ON OR OFF. 


THE EDIT PROCESSING ROUTINE (EPR) PERFORMS BASIC SPFSUBS 
EDIT FUNCTIONS. (I.E. SCROLLING, LINE COMMANDS, AND 

PRIMARY COMMANDOS). EPR RETURNS CONTROL KHEN THE 

PRIMARY COMMANDS SAVE OR CANCEL ARE EXECUTED, OR 

WHEN THE END KEY IS PRESSED. 


STEP 4 IS EXECUTED IN THE EVENT OF "END", "SAVE'', OR 
"CANCEL". FOR "SAVE", THE DATA IS WRITTEN TO THE 
EDIT DATA SET, BUT NOT THE LIST DATA SET. FOR 
“END, THE DATA IS WRITTEN TO THE EDIT DATA SET IF 
ANY CHANGES HAVE OCCURRED, AND IT IS RECORDED IN THE 
LIST DATA SET IF "PRINT" MODE IS ON VIA SUBROUTINE 
CPRINT. THE PROCEDURES FOR WRITING THE EDIT DATA 
SET ARE AS FOLLOWS: 


THE SUBROUTINE CDO IS CALLED TO OPEN THE DATA SET 
FOR OUTPUT AND PERFORM A RESERVE. 

THE SUBROUTINE CDP IS CALLED TO WRITE EACH RECORD. 
THE STON-REPLACE SYSTEM SERVICE IS ISSUED,IF IT 
IS A PARTITIONED DATA SET. 

THE SUBROUTINE CDO IS CALLED TO CLOSE AND RELEASE 
{AND DEQ) THE DATA SET. 


WHENEVER THE DATA IS SAVED, A RECORD IS WRITTEN TO 
THE LOG DATA SET BY CALLING THE SUBROUTINE CLOG. 


FOLLOWING "END" OR “CANCEL, CONTROL IS RETURNED TO 
THE CALLING PROCEDURE (STEP 7). FOLLOWING "SAVE", 
STEP 3 IS EXECUTED. 


STEP 5 IS EXECUTED FOR A "CREATE" OR "REPLACE" SPFSUBS 
PRIMARY COMMAND. THE EDIT, LIST, AND LOG DATA SETS 

ARE WRITTEN USING THE SAME PROCEDURES DESCRIBED 

FOR STEP 4. THEN STEP 3 IS EXECUTED. 


STEP 6 IS EXECUTED FOR A "MOVE" OR "COPY" PRIMARY SPFSUBS 
COMMAND. SUBROUTINE CGET IS CALLED TO READ EACH 

RECORD OF THE EDIT DATA SET MEMBER. FOR "MOVE'', A 

STOH-DELETE SYSTEM SERVICE IS ISSUED TO DELETE THE 

MEMBER FOLLOWING A SUCCESSFUL COPY. THE SUBROUTINE 

CLOG IS CALLED TO WRITE A RECORD TO THE LOG DATA 

SET. THEN STEP 3 IS EXECUTED. 


WHEN END OR CANCEL HAS BEEN PROCESSED, CONTROL IS 
RETURNED TO THE CALLER (EPO OR EPS). 
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CHART 5.2 
EDIT PROCESSOR 


INPUT y PROCESS OUTPUT 


INITIALIZE 


2. DISPLAY SCREEN 
IMAGE 


3. ANALYZE PRIMARY EDT 


~ [EDR CHAIN 
L 


&. PERFORM INITIAL 
PRIMARY COMMAND 


PROCESSING I] 
5. PROCESS DATA 


AREAS 


PROCESS LINE 
COMMANDS 


PERFORM FINAL 
PRIMARY COMMAND 
PROCESSING 


RETURN 


RETURN TO 5.1 
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EXTENDED DESCRIPTION 


SELECTED FIELDS IN THE EDIT TABLE (EDT) ARE 

INITIALIZED. 

- IF THE EDIT RECORD CHAIN IS EMPTY, ENOUGH "INSERT" 
LINES ARE INSERTED BETWEEN THE TOP AND BOTTOM EDIT 
RECORDS TO FILL THE CURRENT LOGICAL SCREEN. 


THE LOGICAL SCREEN IS FORMATTED. EITHER SUBROUTINE 
CERR OR CDISPL IS CALLED TO DISPLAY IT. THEN THE 
SCREEN IMAGE IS RESTORED BY REMOVING TABS AND NULLS. 


IF THE COMMAND INPUT FIELD IS NOT BLANK, IT IS 
ANALYZED. THE COMMAND VERB IS IDENTIFIED AND 
PARAMETERS ARE SCANNED. THE EDPCWDS ARRAY IN THE 
EDIT TABLE (EDT) IS BUILT. 


INITIAL COMMAND PROCESSING IS PERFORMED FOR THE 

FOLLOWING PRIMARY COMMANDS: 
AUTONUM 
CANCEL 
CAPS 
CREATE 
COPY 
HEX 
MOVE 
NULLS 
NUMBER 
PRINT 
PROFILE 
RECOVERY 
RENUM 
REPLACE 
RESET 
STATS 
TABS 
UNNUM 


EACH DATA AREA THAT HAS BEEN MODIFIED IS PROCESSED 

AS FOLLOXS: 

—- MASK DATA IS MOVED TO THE MASK FIELD, 

- TABS DATA IS VALIDATED AND MOVED TO THE TASS 
FIELD. 

~ BOUNDS DATA IS USED TO COMPUTE NEW BOUNDS. 

~ ALL OTHER DATA IS MOVED INTO A CORRESPONDING EDIT 
RECORD (EDR). 
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LOAD 
MODULE 


SPFSUBS 


SPFSUBS 


SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUSS 
SPFSUBS 
SPF SUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPF SUBS 
SPFSUBS 
SPFSUBS 


SPFSUBS 
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CHART 5.2 


EDIT PROCESSOR 


" OBJECT 
MODULE 


LABEL 


EPRIOIH 


EPR20IR 


EPIAUTON 
EPICANCL 
EPICAPS 
EPIMEMB 
EPIMEMS 
EPIHEX 
EPIMENB 
EPINULLS 
EPINUMB 
EPIPRINT 
EPIPROF 
EPIRECVR 
EPINUMB 
EPIMEMB 
EPIRESET 
EPISTATS 
EPITA5S 
EPINUMB 


EPD 
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CHART 5.2 
( EDIT PROCCESSGR 
LOAD —s_sés« OBJECT 
EXTENDED DESCRIPTION MODULE MODULE LABEL 


6. LINE COMMANDS THAT HAVE BEEN ENTERED IN THE SEQUENCE 
FIELDS ARE MOVED TO THE CORRESPONDING EDIT RECORDS. 
- THE EDIT RECORD CHAIN IS THEN SCANNED AND LINE 
COMMANDS ARE VALIDITY CHECKED. FINALLY THE EDIT 
RECORD CHAIN IS SCANNED AND THE LINE COMMANDS ARE 
EXECUTED. 


THE FUNCTION IS PERFORMED BY USING THE SUBROUTINE 
CODE FROM THE EDIT LINE COMMAND DEFINITION (ELC 
ENTRY) AND INDEXING INTO A LIST OF ADDRESSES OF 
INTERNAL PROCEDURES. THE COMMANDS THAT ARE EXECUTED 
ARE: 

A (AFTER) 

B (BEFORE) 

BOUNDS 

C (COPY) 

COLS 

D (DELETE) 

I (INSERT) 

M (MOVE) 

MASK 

O (OVERLAY) 

R (REPEAT) 

L (LAST) 

S (SHOW) 

F (FIRST) 


(EXCLUDE ) 
(SHIFT) 
(SHIFT) 
(SHIFT COLS) 
(SHIFT COLS) 


7. THE FOLLOWING PRIMARY COMMANDS ARE PROCESSED: 
CANCEL 
CHANGE 
COPY 
CREATE 
FIND 
LOCATE 
MOVE 
NUMSER 
PROFILE 
RENUM 
REPLACE 
RESET 
SAVE 
SUBMIT 
UNNUN 
THE FOLLOWING PROGRAM FUNCTION KEYS (PFK'S) ARE ALSO 
PROCESSED: END 
REPEAT FIND 
REPEAT CHANGE 


8. IF NO ERRORS HAVE BEEN DETECTED AND NO INFORMATION 
MESSAGES ARE TO BE DISPLAYED; AND IF THE END KEY HAS 
BEEN PRESSED, OR A CANCEL COMMAND HAS BEEN ENTERED, 
THEN EDIT PROCESSING IS TERMINATED. 
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SPFSUBS 


SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUSS 
SPFSUSS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUSS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 


SPFSUBS 
SPFSUSS 
SPFSUBS 
SPFSUSS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 


SPFSUBS 
SPFSUBS 
SPFSUBS 


SPFSUBS 


ECLAFTER 
ECLBEFOR 
ECLBOUND 
ECLCOPY 
ECLCOLS 
ECLDEL 
ECLINSRT 
ECLMOVE 
ECLMASK 
ECLOVER 


| ECLREP 

| ECLSBOT 
| ECLSHOW 
| ECLSTOP 


ECLTABS 
ECLTENTR 
ECLTFLOW 
ECLTSPLT 
ECLXCLUD 
ECLSR 
ECLSL 
ECLSCR 
ECLSCL 


EPF 
EPFCANCL 


EPF PROF 
EPFNUNB 
ECR 
EPFRESET 
EPFSAVE 
EPFSUBMT 
EPFNUMB 


EPR 
EFC 
EFC 


EPR 
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FROM 5.2 
INPUT 


CHART 6.2.1 
EDIT DISPLAY SCREEN 


PROCESS OUTPUT 


eoR CHAIN | | 1. PERFORM SCROLLING 


2. FOR EACH LINE 
A. FORMAT SEQUENCE 
NUMSER FIELD 
B. FORMAT DATA FIELD 


3. DETERMINE CURSOR 
LOCATION 


4. OVERLAY SCREEN IMAGE 
WITH TAB CATTR) BYTES 


5. OVERLAY TRAILING BLANKS 
WITH NULL CHARACTERS 


6. CONVERT SCREEN IMAGE 
TO HEX FORMAT 


7. DISPLAY SCREEN AND 
WAIT FOR RESPONSE 


EDIT 
DATA 
DISPLAY 


pasendt 


&. RECONVERT FROM HEX 
TO STANDARD FORMAT 


CLEAR TAB CHARACTERS 


10. RESET NULL CHARACTERS 
BACK TO BLANKS 


11. SAVE CURSOR LOCATION 
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RETURN TO 5.2 
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CHART 5.2.1 
EDIT DISPLAY SCREEN 


LOAD = =§ OBJECT 
EXTENDED DESCRIPTION MODULE MODULE LABEL 


1. IF A SCROLL REQUEST WAS MADE (TLDSCROL = ON), A NEW SPFSUBS EFRI5PS 
FIRST DISPLAY LINE (EDRP(EDFDISPL)) OR A NEW FIRST 
DISPLAY COLUMN (EDCOL(EODRECDSP,EDLEFT)) IS SET UP, 
AND SUBROUTINE CSCROLL IS CALLED. 


2. FORMAT THE DISPLAY, PROCESSING EDIT RECORDS, SPFSUBS EFR2OFS 
STARTING AT THE FIRST DISPLAY LINE CEDRPCEDFDISPL)) 
A. IN THE SEQUENCE FIELD, SET UP EITHER: SPFSUBS EFR21CA 
1. PENDING LINE COMMAND FROM PREVIOUS IMAGE 
2. A MASK ( HMR, owe »BOUNDS ,— = -,COLS 
MASK , TABS » =ERR=>, OR =CHG=>) 
3. A SEQUENCE NUMBER EITHER FROM THE EDIT 
RECORD (IF RENUM MODE) OR THE RELATIVE 
NUMBER OF THE EDIT RECORD IN THE EDIT 
RECORD CHAIN (IF NONUM MODE). 
SET THE INTENSITY LOW FOR SEQUENCE NUMBERS AND 
HIGH FOR ALL OTHERS. 
B. IN THE DATA FIELDS: SPFSUBS EFR22DA 
1. MOVE IN DATA FROM THE EDIT RECORD, OR 
2. MOVE IN DATA FROM THE MASK FIELD, OR 
3. MOVE IN DATA FROM THE TABS FIELD, OR 
4. MOVE IN THE EXCLUDED LINES MESSAGE AND 
ENTER THE NUMBER OF EXCLUDED LINES, OR 
5. GENERATE THE BOUNDS LINE, OR 
6. GENERATE THE COLS LINE. 


3. DETERMINE THE CURSOR LOCATION. IF EDCSRSET = ON THE | SPFSUBS EFR30SC 

CURSOR POSITION HAS ALREADY BEEN DETERMINED AND 

STORED IN THE TLOCSRP FIELD. IF NOT, THE THE CURSOR 

MAY BE ASSOCIATED WITH AN EDIT RECORD AND AN OFFSET 

IN THE RECORD. IF SO DETERMINE THE CORRESPONDING 

POSITION ON THE SCREEN. IF THE POSITION ON THE 

SCREEN CANNOT BE DETERMINED, PUT THE CURSOR ONTO 

LINE 2. IF THE CURSOR IS WITHIN THE DATA PORTION OF 

THE SCREEN, USE THE TABS LINE TO DETERMINE THE NEXT 

POSITION FOR THE CURSOR AND SET IT TO THAT LOCATION. 


IF TABS MODE IS IN EFFECT PUT ATTRIBUTE BYTES IN SPFSUBS EFR4OST 
EACH COLUMN POSITION WHERE AN ASTERISK IS FOUND IN 

THE TABS LINE (OVERLAY NON-BLANK CHARACTERS ONLY IF 

IN TABS ANY MODE). 


BACKWARD SCAN EACH FIELD OF THE DATA PORTION OF THE EFRG5SN 
SCREEN FOR TRAILING BLANKS TO REPLACE WITH NULL 

CHARACTERS. IF ENTIRE FIELD IS BLANK, DO NOT 

REPLACE FIELD WITH NULLS UNLESS TABS ALL IS IN 

EFFECT (EDTABBO = OFF). IF CURSOR IS WITHIN A 

FIELD, DO NOT REPLACE BLANKS AT OR BEFORE CURSOR 

WITH NULLS. 


IF HEX MODE IS ON, CONVERT SCREEN IMAGE FROM SPFSUBS EFR50FH 
STANDARD FORMAT TO HEX FORMAT. THE FIRST FEW LINES 

ON THE SCREEN WILL BE EXPANDED TO FILL THE SCREEN. 

THE CURSOR IS REPOSITIONED FOR HEX MODE. 
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CHART 5.2.1 
EDIT DISPLAY SCREEN 


LOAD “OBJECT 
EXTENDED DESCRIPTION MODULE MODULE LABEL 


7. IF AN ERROR OR INFORMATION MESSAGE IS TO BE SPFSUBS EFR600S 
DISPLAYED SUBROUTINE CERR IS CALLED, OTHERWISE 
SUBROUTINE CDISPL IS CALLED. 


&. IF HEX MODE WAS ON, RECONVERT THE SCREEN IMAGE FROM SPFSUBS EFR70RH 
HEX FORMAT TO STANDARD FORMAT. REPOSITION CURSOR. 


9. REPLACE ATTRIBUTE BYTES THAT WERE CREATED IN SPFSUBS EFRSOCT 
STEP 4 WITH THE DATA CHARACTERS THAT THEY OVERLAYED. 


10. IF TABS MODE IS NOT ON, ONLY MODIFIED LINES WILL BE | SPFSUBS EFRSOCT 
EXAMINED, AND THE DISPLAY INTERFACE WILL HAVE 
TRANSLATED NULLS TO BLANKS. IF TABS ARE ON ONLY 
PART OF A LINE MIGHT HAVE BEEN MODIFIED, SO 
TRANSLATE ANY NULLS TO BLANKS. 


11. IF THE CURSOR WAS ON A LINE, ASSOCIATE IT WITH THE SPFSUBS EFR9SORC 
CORRESPONDING EDIT RECORD (EDR). 
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PROCESS 


DISPLAY UTILITY 
SELECTION MENU 


SPF 
MENUS 
DATA SET 


INTERPRET RESPONSE 
FROM TERMINAL 


IF RESPONSE IS NOT 
END XEY, LINK TO 
INDICATED PROGRAM 

i) CERZORM REQUESTED 
FUNCTION 


SPF 
MSGS 
DATA SET 


RETURN 


CHART & 
UTILITIES 


OUTPUT 


UTILITY 
SELECTION 
MENU. 


™ & 
s 4s , a 
vo” ee 

ay 


AOOoe 2s 
e 
On 


RETURN TO 2 
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THIS SECTION ILLUSTRATES THE PHYSICAL STRUCTURE AND ORGANIZATION OF 
SPF PROGRAMS AND DESCRIBES THE PROGRAM INTERFACE REQUIREMENTS. THE 
SECTION IS ORGANIZED AS FOLLOWS: 


PROGRAM COMPONENTS - LISTS THE NAMES OF ALL SPF LOAD MODULES 
AND OBJECT MODULES. 

LOAD MODULE HIERARCHY = the THE RELATIONSHIP BETWEEN LOAD 
ODULES. 


OBJECT MODULE DESCRIPTIONS - BRIEFLY DESCRIBES THE PURPOSE OF EACH 
OBJECT MODULE. FOR OBJECT MODULES THAT 
ARE PROGRAMS, CALLING SEQUENCE 
INFORMATION IS ALSO GIVEN. THIS SECTION 
IS ORDERED ALPHABETICALLY BY MODULE NAME. 
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PROGRAM COMPONENTS 


THE FOLLOWING IS A LIST IN ALPHABETICAL ORDER OF THE LOAD MODULES WHICH 


COMPRISE SPF, 


SHOWING THE 


OBJECT MODULECS) INCLUDED IN EACH LOAD MODULE. 


THE NAME OF THE ENTRY POINT CEP) MODULE FOLLOWS THE LOAD MODULE TITLE. 


LOAD OBJECT DESCRIPTION CEP: ENTRY POINT) 
MODULE MODULE 


SPFBRO 


SPFCALCP 


SPFEDIT 


SPFFOR 


SPFJOB 


SPFMAIN 


SPFOPT 


SPFPMD 


SPFSCAN 


SPFSPC 


SPFSUBS 
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--------- SPF DRIVER LOAD MODULE (EP: SPF) 
SPF ------ SPF DRIVER 

--------- BROWSE LOAD MODULE (EP: BRO) 
BRO ------ BROWSE MAIN 

-------- CALL COMMAND PROCESSOR CEP: SPFCALCP) 

~-------- EDIT LOAD MODULE CEP: EDD) 
EDD ------ EDIT MAIN DRIVER 

~-------- FOREGROUND PROCESSOR LOAD MODULE (CEP: FOR) 
OR ------ FOREGROUND PROCESSOR 

~-------- BACKGROUND PROCESSOR LOAD MODULE (EP: JOB) 
0B ------ BACKGROUND PROCESSOR 

-------+-- SPF CONTROLLER LOAD MODULE (EP: SMD) 


CIPARMS -- COMMON INITIALIZE USER PARMS 
S 


LP S25 =5 PF INPUT PARMS EXIT ROUTINE 

SMA = -=-== SPF MAIN ATTACH 

SMC. =S==<= SPF MAIN CONTROLLER 

SD ‘=== == SPF MAIN DRIVER 

SL. Se ==S= SPF MAIN INITIALIZATION 

SNE. SS Sa=s SPF MAIN LINE I/O INTERFACE 

Lh ===Ss> SPF KEYNORD/VALUE PROTOTYPE TABLE 

TK Ses=e= SPF KEYWORD TABLE 

tht =<<=== SPF TABLE OF REENTRANT TABLES 
==S22=->- SPF PARAMETERS -AND DEFAULTS LOAD MODULE CEP: OPT) 
OPI s=s-s= SPF PARAMETERS AND DEFAULTS OPTION 
= Se PROCESSOR MAIN DRIVER LOAD MODULE CEP: PMD) 
PPL Hse =s= PROCESSOR FINAL TERMINATION 

PMD s==== PROCESSOR MAIN DRIVER 

rhe o> = == PROCESSOR RESTART 
Scena BACKGROUND SCAN LOAD MODULE CEP: SCN) 

SCN. SS=S=> BACKGROUND SCAN 
Soo eos SPF PARMS CONVERSION LOAD MODULE CEP: SPC) 
SPC. ==s=== SPF PARMS CONVERSION CVERSION 2.1 TO VERSION 2.2) 
a a COMMON SUBROUTINE LOAD MODULE CEP: TSC) 
BCD. ==<<== BROWSE COMMAND DEFINITIONS 

CAL ====s= COMMON ATTACH COMMAND 

CBG -2oSen= COMMON BROWSE CLEANUP 

CBDSN ---- COMMON BUILD DATASET NAME 

CEE S=ss== COMMON BROWSE FIND 

CBG ===> +> COMMON BRONSE GET 

CBR <==s== COMMON BROWSE 

C53.-=SS=== COMMON BROWSE SETUP 

CCB ===<= COMMON COMMAND BUILD 

CCD) +s=s-= COMMON CONVERT DIRECTORY ENTRY 

CCR. SSeS == COMMON COMMAND PARSE 

CCS. = === o> COMMON COMMAND SCAN 

CDA -<9--== COMMON DATASET ALLOCATE 


CCONTINUED ON NEXT PAGE) 
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CDAIR ---- 
CDATE ---- 
cD¢ ----- - 
CDERR ---- 


CHPJ ----- 


CKVGET --- 
CKVPUT --- 
CLM 


CMSG 
CRELS ---- 


CTF 
CIGEL =-== 


CUPARMS -- 
CVM 
CVSDE ---- 


COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 
COMMON 


PROGRAM COMPONENTS (CONTINUED ) 


DAIR INTERFACE 

CONVERT DATE 

DATASET CLOSE 

DAIR ERROR 

DATASET FREE 

DATASET GET 

DISPLAY 

DATASET OPEN 

DATASET PUT 

GET DEVICE TYPE 

ERROR MESSAGE 

FIND 

HARDCOPY 

HELP 

HARDCOPY JOB 

HARDCOPY LOCAL 

GET DIRECTORY ENTRY 
GET DSCB INFORMATION 
JOB CARD 

JOB NAME FIND 

JOB NAME SETUP 
KEYWORD/VALUE GET 
KEYWORD/VALUE PUT 

LOAD MODULE LOADER 

LOG 

MENU BUILD 

MEMBER LIST 

MESSAGE 

PRINT DATASET 

RELEASE DASD 

RESERVE DASD 

SUBMIT 

SCROLL 

STORAGE MANAGEMENT 
ALLOCATE TEMPORARY DATASET 
FREE TEMPORARY DATASET 
TGET 

TPUT 

ALLOCCATE TEMPORARY DATASET 
FREE TEMPORARY DATASET 
UPDATE USER PARMS 
VERIFY MEMBER NAME 
VERIFY SPF DIRECTORY ENTRY 


RECOVERY INITIALIZATION 
BACKUP END 

BACKUP INITIALIZATION 
RECOVERY READ 

BACKUP STORE 

BACKUP RESET 

COMMAND DEFINITIONS 
CREATE/REPLACE COMMAND FINAL 
DATA INPUT 

DATA OUTPUT 

FIND/CHANGE 

FORMAT DISPLAY 

FLOW TEXT 

GENERAL NUMBER 

GENERAL RESET 

MOVE/COPY COMMAND FINAL 
MESSAGE LINE 

MENU PROCESSOR 

PROCESS LINE COMMAND 
PROCESS DATA 

PROCESS FINAL 

PROCESS INITIAL 

PDS PROCESSOR 

PROFILE PROCESSOR 


CCONTINUED ON NEXT PAGE) 
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PROGRAM COMPONENTS (CONTINUED ) 


SPFTBLS 


SPFTCM -- 


SPFTMENU 


SPFTSO -- 


SPFTUTOR 


SPFUCA -- 


SPFUCIL -- 


SPFUC2 -- 


SPFUDA -- 


SPFUHC -- 
SPFUMC -~- 


SPFUOL -- 


EPX:====+== EDIT 
ERA. ‘=<==== EDIT 
ERC: ===<+= EDIT 
ERD: ====== EDIT 
ERP ==-===5 EDIT 
ERL ==<==== EDIT 
ERN =s>=== EDIT 
ERO “<=<+== EDIT 
ERR. - ===>" EDIT 
EKS ‘=<==== EDIT 
ERA =S=s== EDIT 
Ea =====F EDIT 
ELC. =o=-S> EDIT 


MAIN PROCESSOR 
SEQUENTIAL DATASET PROCESSOR 
OTHER DATASET PROCESSOR 


RECORD 
RECORD 
RECORD 
RECORD 
RECORD 
RECORD 
RECORD 
RECORD 
RECORD 
RECORD 


ALLOCATE 
CHANGE 

DELETE 

FREE 

INSERT 

NUMBER 

DELETE ORIGINAL 
RESET 

SHOW 

EXCLUDE 


SPLIT TEXT 
TABLE CLEANUP 


ELS s==2=>> EDIT TABLE SETUP 

ETL ---r>-~- EDIT LINE COMMAND TABLE 

MERR ----~- COMMON MENU ERROR 

MHA: <====— COMMON MENU HANDLER 

SOP Ss=Ss= SPF OUTPUT PARMS EXIT 

[SCS S=s— TABLE OF COMMON SUBS 

ae es COMMON TABLES LOAD MODULE CEP: TSI) 

loko =s==s> COMMON TABLES 

Spore COMMAND TABLE LOAD MODULE CEP: TCM) 

TCM =s=-== COMMAND TABLE 

=== -=S-= MENU TESTER LOAD MODULE CEP: MNT) 

INT =sSS== TEST MENU CDEBUGGING AID) 

<o ea TSO COMMAND PROCESSOR LOAD MODULE CEP: PTC) 
PL: == SS5= TSO COMMAND PROCESSOR 

aaa laa TUTORIAL PROCESSOR LOAD MODULE CEP: TUT) 

TUT <s==== TUTORIAL PROCESSOR 

=== CATALOG MANAGEMENT DRIVER LOAD MODULE CEP: UCA) 
UCR Saa=== CATALOG MANAGEMENT DRIVER 

SSeo2=s= SVS CATALOG MANAGEMENT LOAD MODULE CEP: UCI) 
UCL ==<s==> SVS CATALOG MANAGEMENT 

ae MVS CATALOG MANAGEMENT LOAD MODULE CEP: UC2) 
UC2 === s> MVS CATALOG MANAGEMENT 

a ae LIBRARY/DATA SET UTILITY LOAD MODULE CEP: UDA) 
UA. -“==Ss== ALLOCATE NEW DATA SET 

VAC SsS=-> CATALOG/UNCATALOG DATA SET 

UAD ------ DELETE DATA SET 

UAL === === DISPLAY DATA SET INFORMATION 

UAR =-=-<-= RENAME DATA SET 

UDA: ====—= LIBRARY/DATA SET UTILITY DRIVER 

UDM ===> LIBRARY UTILITY MEMBER LIST 

UDMS ----- LIBRARY UTILITY MEMBER SELECT 

UDP ==—S=— PRINT DATA SET 

UDA: ===S== PRINT INDEX LISTING 

UDZ) ===> COMPRESS DATA SET 

—~—7----= HARDCOPY UTILITY LOAD MODULE CEP: UHC) 

UHC ------ HARDCOPY UTILITY 

oS MOVE/COPY UTILITY LOAD MODULE CEP: UMC) 

UMC. <S==<= MOVE/COPY UTILITY 

UNCS -==--= MOVE/COPY UTILITY MEMBER SELECT 


-------- OUTLIST UTILITY LOAD MODULE 


CEP =?UOL) 


UGE) =H=2>= OUTLIST UTILITY 
(CONTINUED ON NEXT PAGE) 
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PROGRAM COMPONENTS (CONTINUED ) 


SPEURS: SSS -e-S= RESET SPF STATISTICS LOAD MODULE CEP: URS) 
URS: =-<-== RESET STATISTICS UTILITY 
URSS =<=== RESET STATISTICS UTILITY MEMBER SELECT 

SPFUSC ---------- SCRIPT/VS UTILITY LOAD MODULE CEP: USC) 
JSC ===-== SCRIPT/VS UTILITY 

SPEUTIL, SSS==sS<= UTILITY DRIVER LOAD MODULE CEP: UTIL) 
UTIL <=-<-= UTILITY DRIVER 

SPEUVT. ===-==<<== VTOC UTILITY LOAD MODULE CEP: UVT) 
UNT ==<s== VTOC UTILITY 

SPFS277.-S<=s4-=-== 3277 TABLES LOAD MODULE CEP: TT1) 
TL Sssse= 3277 TABLES 

SPF5276 0 ==-=====- 3278 TABLES LOAD MODULE CEP: TT2) 
Ti20s===S= 3278 TABLES 

SPFS278C <<S<<=<= 3278 CANADIANCFRENCH) TABLES LOAD MODULE CEP: TT3) 
Dis = Sess= 3278 CANADIANCFRENCH) TABLES 
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B TERARC 


THE FOLLOWING FIGURE. SHOWS THE SPF LOAD MODULE HIERARCHY. THE UPPER 
NAME IN EACH BOX IS THE LOAD MODULE NAME. THE LOWER NAME IN EACH BOX 


CONTAINS THE ENTRY POINT NAME. 


THE FLOW BETWEEN THE LOAD MODULES IS ACCOMPLISHED VIA OS ATTACH, LOAD; 


OR LINK MACROS, AS SHOWN IN THE FIGURE. 


ATTACH (FROM TSO TERMINAL 


LOAD ATTACH 


SPFTCM SPFPMO 
TCM PMO 


SPFTBLS LINK 
TSI 
CONTINUED 
ON NEXT PAGE 
SPFSUBS 


TSC 


SPF3277 
TTl 


SPF3278 | 


TT2 


SPF3278C 


TT3 
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LINK (FROM SPFPMD) 


SPFOPT SPFBRO SPFEDIT SPF JOB 
OPT BRO EOD JOB 


SPFPTC SPFUTIL SPF TMENU SPFTUTOR 
PTC UTIL MNT TUT 
| 
LINK 
SPFUDA 
UDA 
SPFUVT SPFUOL SPFFOR 
UVT UOL FOR 
| 


| 
LINK ATTACH 


VIA 
| 
SPFCALCP 
SPFCALCP 


ATTACH (BY INITIATOR ~— FOR SPF 


| BACKGROUND PROCESSING OPTION) 
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OBJECT MODULE DESCRIPTIONS 


THIS SECTION CONTAINS DESCRIPTIONS OF ALL SPF OBJECT MODULES. 
THE FOLLOWING IS A DESCRIPTION OF THE FORMAT USED IN THIS SECTION: 


XXXX - TITLE OF OBJECT MODULE. 


PURPOSE: 


THIS SECTION IS SPECIFIED ONLY FOR OBJECT MODULES THAT ARE PROGRAMS 
SUL eal DESCRIBES THE PURPOSE OF THE PROGRAM COBJECT MODULE 
x ‘ 


INVOKED WITH: 


THIS SECTION IS SPECIFIED ONLY FOR OBJECT MODULES THAT ARE 
PROGRAMS. THE SECTION IDENTIFIES HOW OBJECT MODULE XXXX IS 
INVOKED. INVOCATION IS VIA EITHER CALL, LINK OR ATTACH. FOR 
MODULES OTHER THAN COMMON SUBROUTINES, THE INVOKING OBJECT MODULE 
IS GIVEN IN PARENTHESIS. FOR EXAMPLE: 


LINK TO SPFZZZZ CFROM PMD). 


REFERENCED VIA: 


THIS SECTION IS SPECIFIED ONLY FOR OBJECT MODULES THAT ARE TABLES 
cue pores AND DESCRIBES HOW PROGRAMS GET ADDRESSABILITY TO 
A . 


CALLING SEQUENCE PARAMETERS: 


THIS SECTION IS SPECIFIED ONLY FOR OBJECT MODULES THAT ARE 
PROGRAMS. THE SECTION LISTS ALL PARAMETERS PASSED TO THE MODULE BY 
THE INVOKING MODULE. THE COLUMNS ARE FROM LEFT TO RIGHT: 

PARAMETER NUMBER, PARAMETER NAME, FORMAT, USAGE, TITLE. THE FORMAT 
COLUMN EITHER CONTAINS THE FORMAT OF THE PARAMETER (E.G. "CHAR(8)") 
OR THE DATA AREAS SECTION DESCRIBING THE TABLE (E.G. "<TLD>™) OR AN 
ASTERISK (€%) INDICATING THAT THE PARAMETER IS DESCRIBED BELOW IN 
THE "WHERE® SECTION. FOR EXAMPLE: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. MEMBER CHAR(8) INPUT NAME OF PDS MEMBER 
2. DSNS % INPUT DSNAME STRUCTURE 


RETURN CODE: 


THIS SECTION IS SPECIFIED ONLY FOR OBJECT MODULES THAT ARE 
PROGRAMS. THIS SECTION LISTS REGISTER 15 CONTENTS WHEN THE MODULE 
RETURNS TO THE INVOKING MODULE. FOR ROUTINES USING THE 
SUDBeTETELOL INTERFACE, THE RETURN CODE IS ALSO PLACED IN THE 


NOTES: 


THIS SECTION CONTAINS OTHER INFORMATION USEFUL FOR UNDERSTANDING 
THE OBJECT MODULE. 
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BCD - BROWSE COMMAND DEFINITIONS BCD 


PURPOSE: 


BCD IS THE BROWSE COMMAND DEFINITION TABLE. IT CONTAINS ONE ENTRY 
FOR EACH BROWSE PRIMARY COMMAND. THE COMMAND DEFINITION TABLE IS 
INPUT TO THE COMMON COMMAND PARSE CCCP) ROUTINE, AND IS USED FOR 
ERROR CHECKING AND FOR ORDERING PARAMETERS. 


REFERENCED VIA: 


THE ADDRESS OF THE BCD IS IN THE TSC. IT IS SYMBOLICALLY REFERENCED 
BY THE NAME "BCD" DEFINED IN SEGMENT "TSCDCLS". 


NOTES: 


- THE BCD TABLE IS TERMINATED WITH AN X'FF* CHARACTER. 

- EACH COMMAND DEFINITION WITHIN THE TABLE IS TERMINATED WITH AN 
X"FE* CHARACTER. 

- EACH PARAMETER DEFINITION WITHIN A COMMAND DEFINITION IS TERMINATED 
WITH AN X'FD" CHARACTER. 

- IN ADDITION, THE LENGTH OF EACH COMMAND DEFINITION ENTRY IS PART 
ae ie A AND THE NUMBER OF PARAMETERS DEFINED IS ALSO PART 
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BRO ~ BROWSE DRIVER ROUTINE BRO 


PURPOSE: 


BRO IS INVOKED BY PMD WHEN OPTION 1 IS SELECTED FROM THE PRIMARY 
OPTION MENU. IT ALLOCATES APPROPRIATE DATA SETS, DISPLAYS MEMBER 
LISTS, AND PERFORMS BROWSING. | 


q 


INVOKED WITH: 
LINK TO SPFBRO 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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( CAT - COMMON ATTACH ROUTINE CAT 


PURPOSE: 
CAT IS USED TO ATTACH OTHER COMMANDS AND CLISTS UNDER SPF. 


INVOKED WITH: 
CALL TO CAT 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. CBUF as INPUT COMMAND BUFFER 
3. CCODE FIXEDC31) OUT COMPLETION CODE 
WHERE 
CBUF - IS THE TSO COMMAND BUFFER CONTROL BLOCK. 
CCODE - IS SET TO THE COMPLETION CODE OF THE COMMAND OR CLIST. 


IF THE COMMAND COMPLETED DUE TO ATTENTION, THIS FIELD 
WILL BE SET TO ZERO. 


RETURN CODES: 
0 - NORMAL COMPLETION. 
4 - ATTENTION TERMINATION. 
bd 8 - ABEND TERMINATION. 


NOTES: 


CAT WILL HANDLE COMMANDS AND CLISTS SUBJECT TO THE FOLLOWING 
RESTRICTIONS: 


1. THE FOLLOWING COMMANDS ARE NOT SUPPORTED: LOGON, LOGOFF, SPF, 
' TEST, AUTHORIZED COMMANDS, COMMANDS INVOKING AUTHORIZED PROGRAMS. 


2. ros MAY NOT INVOKE ANY OF THE RESTRICTED COMMANDS LISTED 
OVE. 


3. CLIST ATTENTION EXITS ARE NOT SUPPORTED. 
4. COMMAND PROCEDURE STATEMENT TERMIN IS NOT SUPPORTED. 
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CBC - COMMON BROWSE CLEANUP ROUTINE CBC 


PURPOSE: 


CBC CLEANS UP (FREEMAINS) THE COMMON BROWSE TABLE (CBT). IT MUST BE 
CALLED, IF CBS IS CALLED TO SET UP THE CBT. 


INVOKED WITH: 
CALL TO CBC 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. CBITP PTRC31) INPUT PTR TO BROWSE TABLE (CBT) 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


TO USE THE COMMON BROWSE ROUTINE: 

FIRST CALL CBS CCOMMON BROWSE SETUP ROUTINE) 

THEN CALL CBR (COMMON BROWSE ROUTINE) ONE OR MORE TIMES 

THEN CALL CBC CCOMMON BROWSE CLEANUP ROUTINE) 
FIND STRINGS, AND BROWSE MODES CASIS, HEX ETC) WILL BE REMEMBERED 
FROM ONE CBR CALL TO THE NEXT CUNTIL CBC IS CALLED). 


NOTE THAT CBR CAN BE CALLED WITHOUT EXPLICITLY CALLING CBS/CBC AND 


WITHOUT PASSING A VALID COMMON BROWSE TABLE (CBT). IN THIS CASE, CBR 
CALLS CBS/CBC AND SETS UP THE CRT INTERNALLY. 


116 SPF/TSO PROGRAM LOGIC MANUAL LICENSED MATERIAL - PROPERTY OF IBM 


CBDSN - COMMON BUILD DSNANE ROUTINE ‘ CBDSN 


PURPOSE: 


CBDSN IS PASSED PARAMETERS FROM A DATA SET MENU. IT BUILDS THE 
APPROPRIATE FULLY-QUALIFIED DATA SET NAME AND VERIFIES THAT IT IS 
NOT AN SPF DATA SET THAT IS CURRENTLY OPEN. IT STORES THE DATA SET 
NAME AND LENGTH IN A STRUCTURE SUITABLE FOR USE WITH DAIR. 


INVOKED WITH: 
CALL TO CBDSN 


CALLING SEQUENCE PARAMETERS: 


1. TLD 

2. MPROJ 

3. MLIBR 

4. MTYPE 

5. MMEMB 

6. MDSN 

7. ODSNS 

8. MEMBER 

9. MSGID 

10. PARM& 

WHERE 
DSNS = 
MEMBER - 
MSGID = 
PARM& = 


RETURN CODE: 
0 - DSNAME IS 
4 - DSNAME IS 


<TLD> INPUT LOGICAL DISPLAY TABLE 

CHAR(8) INPUT PROJECT NAME FROM MENU 

CHARC8) INPUT LIBRARY NAME FROM MENU 

CHAR(8) INPUT TYPE NAME FROM MENU 

CHAR(8) INPUT MEMBER NAME FROM MENU 

CHARC56) INPUT "OTHER™ DATA SET NAME FROM MENU 
CHAR(C46 ) OUTPUT SELECTED DATA SET NAME STRUCTURE 
CHAR(8) OUTPUT SELECTED MEMBER 

CHARC4) OUTPUT ERROR/PROMPTING ERROR MESSAGE ID 


FIXEDC31) OUTPUT PARAMETER NUMBER FOR CURSOR 


IS THE DATA SET NAME STRUCTURE CSTANDARD DAIR FORMAT). 
E.G., DCL 1 DSNS, 
2 DSNL FIXED(15), 7% DSNAME LENGTH X/ 
2 DSN CHARC449); 7* DSNAME *%/ 


IS THE USER-SPECIFIED MEMBER NAME CIF ANY) WHICH IS 
EXTRACTED FROM “OTHER™ DSNAME OR COPIED FROM THE 
"MMEMB” INPUT PARAMETER. 


IS THE ID OF AN ERROR OR PROMPTING MESSAGE CIF ANY). 
IF NO ERROR IS DETECTED, THE MSGID IS NOT CHANGED. 


IS THE PARAMETER NUMBER ASSOCIATED WITH THE ERROR OR 


PROMPTING MESSAGE, FOR CALLING MERR. NOTE: A PARM# 
IS ALWAYS RETURNED, EVEN IF THERE WAS NO ERROR. 


NOT A GENERATION DATASET FORMAT NAME, EG. A.BC-1) 
A GENERATION DATASET FORMAT NAME. 
CCONTINUED ON NEXT PAGE) 
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CEDSN - COMMON BUILD DSNAME ROUTINE (CONTINUED) CBDSN 


NOTES: 
THE MSGID AND PARM#® VALUES THAT MAY BE RETURNED BY CBDSN ARE: 

MSGID MEANING PARM? 
"6002" - ENTER PROJECT NAME 1 
*G003" - ENTER LIBRARY NAME 2 
"G004" - ENTER TYPE QUALIFIER 3 
*G054" - DATA SET IS OPEN 1 OR 5% 
"G090" - MISSING QUOTE 5 
"GO91" - DSN LENGTH ERROR 5 
"6092" - INVALID MEMBER NAME 5 
"GO93' - IMBEDDED BLANKS IN DSN 5 
"G094" - GDS NOT CATALOGUED 5 
CUNCHANGED) - NO ERROR 1 OR 5x 


% PARM@® = 1 IF PROJECT, LIBRARY, TYPE WAS SPECIFIED 
% PARM#® = 5 IF “OTHER™ DSNAME WAS SPECIFIED 


MSGID 'GO54' IS RETURNED ONLY IF AN SPF DATA SET (LIST, LOG, TEMPLIST, 
TEMPCNTL, EDIT RECOVERY) WAS SPECIFIED AND IT IS OPEN. IN THIS CASE, A VALID 
DATA SET NAME STRUCTURE HAS BEEN RETURNED, AND THE USING PROGRAM MAY CHOOSE 
TO IGNORE THE 'G054" CONDITION. 


CBDSN DOES NOT PRODUCE ERRORS FOR MANY TYPES OF UNACCEPTABLE DATA 
SET NAMES, I.E. INVALID CHARACTERS OR QUALIFIERS MORE THAN EIGHT 
CHARACTERS LONG. THESE KINDS OF ERRORS WILL BE CAUGHT BY THE 
DYNAMIC ALLOCATION ROUTINE (CDAIR) WHICH IS CALLED FROM CDAIR. 
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i 
t 
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CBF - COMMON BROWSE FIND ROUTINE CBF 


PURPOSE: 
CBF IS CALLED BY COMMON BROWSE (CBR) IF A FIND COMMAND IS ENTERED AS 
A PRIMARY COMMAND, OR IF THE FIND PF KEY IS PRESSED. IT DECODES THE 


FIND COMMAND CIF REQUIRED), AND PERFORMS THE SEARCH TO FIND THE 
REQUIRED STRING. 


INVOKED WITH: 
CALL TO CBF 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. CBT % IN/OUT COMMON BROWSE TABLE 
WHERE 
CBT - IS THE COMMON BROWSE TABLE, WHICH IS INITIALIZED BY CBS 


AND USED BY CBF, CBR, CBG AND CBC. 
RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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CBG ~ COMMON BROWSE GET ROUTINE CBG 


PURPOSE: 
CBG IS CALLED BY COMMON BROWSE (CBR) TO GET A SPECIFIED RELATIVE 
RECORD. IT ATTEMPTS TO FIND THE RECORD ALREADY IN MAIN MEMORY 
(IN AN I/O BUFFER) AND IF IT CANNOT, CALLS COMMON DATASET GET (CDG) 
TO READ A LOGICAL RECORDS. 

INVOKED WITH: 


CALL TO CBG 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. CBT % IN/OUT COMMON BROWSE TABLE 
WHERE 
CBT - IS THE COMMON BROWSE TABLE, WHICH IS INITIALIZED BY CBS 


AND USED BY CBF, CBR, CBG AND CBC. 
RETURN CODE: 
0 - ALWAYS. 


NOTES: 


CBR BUILDS A TRACK/RECORD TABLE AS RECORDS ARE READ, TO ENABLE IT 
TO COMPUTE A TTRN FOR ANY LOGICAL RECORD ALREADY READ. IT ALSO 
MAINTAINS IN THE COMMON BROWSE TABLE AND ARRAY OF POINTERS AND 
LENGTHS TO LOGICAL RECORDS THAT ARE ALREADY IN MAIN MEMORY IN AN 
I70 BUFFER. THESE FUNCTIONS IMPROVE PERFORMANCE AND MINIMIZE THE 
AMOUNT OF ACTUAL I/70 REQUIRED TO GO TO SPECIFIC LOCATIONS IN THE 
DATA SET OR MEMBER. 


SPECIAL INTERFACES TO COMMON DATASET GET (CDG) ARE USED BY CBG TO 


ENABLE CBG TO DETERMINE THE RELATIVE TTRN OF EACH LOGICAL RECORD, 
AND TO POINT DIRECTLY TO THE CORRECT TTR WHEN I/70 IS NOT SEQUENTIAL. 
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CBR - COMMON BROWSE ROUTINE CBR 
PURPOSE: 
CBR IS USED TO DISPLAY CAND ALLOW SCROLLING) OF A SEQUENTIAL DATA SET 
OR MEMBER OF A PARTITIONED DATA SET. 


INVOKED WITH: 
CALL TO CBR 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. FD <TFD> INPUT FILE DEFINITION TABLE 
3. CBTP PTRC31) INPUT PTR TO COMMON BROWSE TABLE 
WHERE 
TFD - IS A FILE CONTROL BLOCK FOR THE DATA SET TO BE BROWSED. 


THE ASSOCIATED DCB MUST BE OPEN AND, FOR A PDS, A FIND 
MUST HAVE BEEN ISSUED FOR THE MEMBER. 


CBTP - EITHER ZERO (0), OR A POINTER TO THE COMMON BROWSE 
TABLE (CBT). 
ZERO - IS PASSED IF CBR IS TO CALL CBS/CBT TO GET 
AND RELEASE THE CBT. 
PTR - IS PASSED IF CBS HAS BEEN CALLED TO SET UP 
THE COMMON BROWSE TABLE, AND CBT WILL BE 
CALLED TO CLEAN UP THE CBT. 
RETURN CODE: 
0 - BROWSE COMPLETED SUCCESSFULLY. 
4 - MEMBER OR DATA SET DOES NOT CONTAIN ANY RECORDS. 
8 - 170 ERROR ATTEMPTING TO READ FIRST RECORD. 


12 - INSUFFICIENT MAIN STORAGE FOR BUFFERS ETC. 


NOTES: 
THIS MODULE HAS REPLACED THE SPF VERSION 2.1 CBRO SUBROUTINE. 
CBR IS CALLED BY BROWSE (SPF OPTION 1), AND VARIOUS UTILITIES. 
CBR ASSUMES THAT THE FIRST TWO LINES OF THE TLS HAVE ALREADY BEEN SET 
UP. IT DOES NOT CHANGE THESE LINES EXCEPT TO DISPLAY COLUMN NUMBERS. 
CBR ALSO ASSUMES THAT THE INITIAL SCROLL AMOUNT HAS ALREADY BEEN 
STORED IN THE TLD CTLDSCAMT). 


CBR NEVER CLOSES OR FREES THE DATA SET WHICH IT IS PASSED. 
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CBS - COMMON BROWSE SET UP ROUTINE ces 


PURPOSE: 
CBS SET UPS CACQUIRE AND INITIALIZE) THE COMMON BROWSE TABLE (CBT) 
THIS FUNCTION CAN BE PERFORMED BEFORE CALLING CBR CONE OR MORE 
TIMES). IF CBS IS CALLED, CBC MUST BE CALLED TO CLEANUP CRELEASE) 
THE CBT. CBS RETURNS A POINTER TO THE CBT TO THE CALLER. 

INVOKED WITH: 


CALL TO CBS 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. CBTP PTR(31) OUTPUT PTR TO BROWSE TABLE (CBT) 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


TO USE THE COMMON BROWSE ROUTINE: 

FIRST CALL CBS (COMMON BROWSE SETUP ROUTINE) 

THEN CALL CBR CCOMMON BROWSE ROUTINE) ONE OR MORE TIMES 

THEN CALL CBC (COMMON BROWSE CLEANUP ROUTINE) 
FIND STRINGS, AND BROWSE MODES CASSIS, HEX ETC) WILL BE REMEMBERED 
FROM ONE CBR CALL TO THE NEXT CUNTIL CBC IS CALLED). 


NOTE THAT CBR CAN BE CALLED WITHOUT EXPLICITLY CALLING CBS/CBC AND 


PASSING A VALID COMMON BROWSE TABLE (CBT). IN THIS CASE, CBR CALLS 
CBS/CBC AND SETS UP THE CBT INTERNALLY. 
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CCB - COMMON COMMAND BUILD ROUTINE CCB 


PURPOSE: 


CCB IS USED TO PROCESS A MENU 7 PROC PAIR. IF THE PROC CONTAINS A 
COMMAND STATEMENT, THE CORRESPONDING COMMAND WILL BE BUILT AND 
RETURNED TO THE CALLER. 


INVOKED WITH: 
CALL TO CCB 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2 MHAPM INPUT MHA PARAMETER LIST 
3 CMDPM % OUTPUT COMMAND BUILD AREA 
4. MSGPM CHAR(104) OUTPUT MESSAGE BUILD AREA 
5. DDNPM CHAR( 548) OUTPUT DDNAME / DSNAME BUILD AREA 
6. KNTPM CHARCX) INPUT KEYBLOCK AREA 
7. WNTPM CHARC¥) INPUT KEYWORD VALUE AREA 
WHERE 
MHAPM =- IS AN AREA FORMATTED AND INITIALIZED EXACTLY THE SAME 


AS THE INPUT PARAMETER LIST TO MHA. INITIALIZATION 
OF THIS AREA WILL OCCUR AUTOMATICALLY BY A PREVIOUS 
CALL TO CMB. 


CMDPM - IS AN AREA WHERE THE COMMAND WILL BE BUILT. 
IT IS FORMATTED BY CCB TO CONTAIN: 
2 BYTE - LENGTH VALUE, 
2 BYTE - OFFSET VALUE, 
VARIABLE LENGTH - COMMAND STRING, CMAX LENGTH OF 
250 BYTES). 
IN THIS FORMAT, IT MAY BE PASSED DIRECTLY TO CAT FOR 
COMMAND EXECUTION. 


MSGPM ~- IS AN AREA WHERE ERROR MESSAGE DATA IS RETURNED. 
It IS MEANINGFUL ONLY IF THE CCB RETURN CODE IS 
NON-ZERO. IT'S FORMAT IS: 
2 BYTE - MESSAGE ID, 
2 BYTE —- CURSOR POSITION, 
24 BYTE - SHORT MESSAGE, 
72 BYTE —- LONG MESSAGE. 


CCONTINUED ON NEXT PAGE) 


LICENSED MATERIAL - PROPERTY OF IBM PROGRAM ORGANIZATION 125 


CCB = COMMON COMMAND BUILD ROUTINE (CONTINUED > . CCB 


DDNPM - IS AN OPTIONAL PARAMETER AND DEFINES AN AREA WHERE | } 
DDNAME AND DATA SET NAME DATA IS RETURNED. IF THE 
PROC INVOKED BY CCB CONTAINS ALLOC AND/OR FREEDSN 
CONTROL CARDS, THE ASSOCIATED DDNAME CFOR ALLOC) 

AND THE DATA SET NAME CFOR FREEDSN) INFORMATION 
IS RETURNED. THE FORMAT OF THIS AREA IS: 
4 BYTE - DDNAME INDEX CNUMBER OF DDNAME'S BELOW) 
80 BYTE - DDNAME LIST CUP TO TEN 8 BYTE DDNAME'S) 
4 BYTE - DATA SET NAME INDEX CNUMBER OF DATA SET 
NAMES BELOW) 
460 BYTE - DATA SET NAME LIST CUP TO TEN 46 BYTE 
DATA SET NAMES FORMATTED AS FOLLOWS: 
2 BYTE - DATA SET NAME LENGTH 
44 BYTE - DATA SET NAME NAME CEBCDIC) 


KNTPM - IS AN OPTIONAL PARAMETER AND DEFINES AN AREA RESEMBLING 
A KVBLOCK. THAT IS, IT CONTAINS THE NAMES OF KEYWORDS 
IN THE SAME FORMAT AS A KVBLOCK AREA. IF A KEYWORD 
VALUE CANNOT BE OBTAINED FROM THE NAME BEING PROCESSED, 
THIS AREA IS SEARCHED PRIOR TO CALLING CKVGET. 


VNTPM - IS AN OPTIONAL PARAMETER (REQUIRED IF KNTPM IS PRESENT) 
AND DEFINDS AN AREA OF KEYWORD VALUES. IF A KEYWORD 
EXISTS IN THE KNTPM AREA, ITS CORRESPONDING VALUE IS 
OBTAINED FROM THIS AREA. 


RETURN CODE: 
0 - SUCCESSFUL. 
4 - ERROR ENCOUNTERED. MSGPM AREA HAS DATA ABOUT THE NATURE OF THE 


ERROR. : 
NOTES: 


CCB IS INTENDED TO BE USED AFTER A PREVIOUS CALL TO CMB. FOR THE 
PURPOSE OF SUBSTITUTING KEYWORD VALUES, CCB ASSUMES THAT THE MENU 
HANDLER BUFFER (MHAF) AND THE MENU ACTION ENTRIES CMHAFACTN) ARE BOTH 
PROPERLY INITIALIZED CWHICH CMB WILL DO). 


IF A PROC KEYWORD VALUE SUBSTITUTION IS REQUIRED FOR AN ITEM WHICH 
DOES NOT EXIST ON THE CORRESPONDING MENU, CCB WILL CALL CKVGET IN AN 
EFFORT TO OBTAIN THE MISSING KEYWORD VALUE. IT WILL FIRST DETERMINE 
IF OPTIONAL PARAMETERS 6 AND 7 ARE PRESENT. IF THEY ARE, THE KNTPM 
AREA WILL BE SCANNED FOR THE KEYWORD. IF FOUND, THE CORRESPONDING 
KEYWORD VALUE WILL BE OBTAINED FROM THE VNTPM AREA. IF PARAMETERS 6 
AND 7 ARE NOT PRESENT, OR IF THE CORRECT KEYWORD COULD NOT BE FOUND 
IN THE KNTPM AREA, CCB WILL CALL CKVGET TO DETERMINE THE VALUE OF THE 
KEYWORD IF IT EXISTS IN THE TKV. 
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ccD 


- COMMON CONVERT DIRECTORY ROUTINE 


PURPOSE: 
CCD CONVERTS A DIRECTORY ENTRY TO EBCDIC FOR PRINTING OR DISPLAYING. 


INVOKED WITH: 
CALL TO CCD 


CALLING SEQUENCE PARAMETERS: 


l. TLD 

2. BLDLENT 
3. SPFFLAG 
4. NAME 

5. LIB 

6. VERSMOD 
7. CDATE 
8. MDATE 
9. MTIME 
10. CURLIN 
ll. INITLIN 
12. MODLIN 
13. USERID 
WHERE 


<TLD> 

% 
CHAR(C1) 
CHAR(8) 
CHAR(1) 
CHAR(7) 
CHAR(8) 
CHAR(8) 
CHAR(5) 
CHARC5) 
CHAR(5) 
CHARC5) 
CHAR(7) 


INPUT 

INPUT 

OUTPUT 
OUTPUT 
OUTPUT 
OUTPUT 
OUTPUT 
OUTPUT 
OUTPUT 
OUTPUT 
OUTPUT 
OUTPUT 
OUTPUT 


LOGICAL DISPLAY TABLE 
BLDL LIST ENTRY 

SPF DIRECTORY ENTRY FLAG 
MEMBER NAME 

LIBRARY NUMBER 
VERSION/MODIFICATION LEVEL 
CREATION DATE 

LAST MODIFIED DATE 

LAST MODIFIED TIME 
CURRENT NUMBER LINES 
INITIAL NUMBER LINES 
MODIFIED NUMBER LINES 
USER ID 


ccd 


BLDLENT - IS AN ENTRY FROM THE OS BLDL CONTROL BLOCK. 


SPFFLAG - INDICATES IF THE ENTRY IS IN SPF LIBARAY ENTRY FORMAT: 
00" HEX - NOT SPF FORMAT 
"O01" HEX - SPF FORMAT 

LIB - CONCATINATION LEVEL NUMBER OR '-" IF MEMBER NOT FOUND. 

VERSMOD - VERSION/MODIFICATION LEVEL - ° VV.MM ° EBCDIC. 

CDATE - CREATION DATE - "YY/MM/DD' EBCDIC. 

MDATE ~ LAST MODIFIED DATE - ‘YY/MM/DD" EBCDIC. 

MTIME - LAST MODIFIED TIME - "HH:MM* EBCDIC. 

USERID - ID OF USER WHO LAST MODIFIED THE MEMBER. 


RETURN CODES: 
0 - ALWAYS. 


NOTES: 
NONE. 
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CCP 


- COMMON COMMAND PARSE 


PURPOSE: 
CCP PARSES A COMMAND THAT HAS BEEN PRESCANNED BY CCS CCOMMON COMMAND 


SCAN). 


CCP DETECTED CERTAIN ERRORS, 


ccP 


AND REORDERS THE PARAMETERS TO 


MAKE THEIR USE BY PROCESSING PROGRAMS EASIER. 


INVOKED WITH: 
CALL TO CCP 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TCS <TCS> IN/OUT COMMAND SCAN TABLE 
3. TCD % INPUT COMMAND DEFINITION TABLE 
4. ERRCODE CHAR(4) OUTPUT ERROR CODE 
5. ERRPTR1 PTRC31) OUTPUT ERROR MESSAGE PTR #1. 
6. ERRPTR2 PTRC31) OUTPUT ERROR MESSAGE PTR #2. 
7. ERRPTRS PTRC31) OUTPUT ERROR MESSAGE PTR #3. 
WHERE 
Tcs IS A COMMAND SCAN TABLE THAT HAS BEEN SET UP BY CCS. 
TCD TIS THE COMMAND DEFINITION TABLE THAT IS USED IN 
PROCESSING THE TCS. J 
ERRCODE TS AN ERROR MESSAGE CODE THAT CAN BE PASSED TO MERR 
OR CERR. NOT USED IF NO ERRORS ARE DETECTED. 
ERRPTR1 IS A POINTER THAT MAY BE SET UP IF AN ERROR CODE IS 


ALSO SET UP. 


RETURN CODE: 
0 - NORMAL RETURN. 
"N’ ~ A NON-ZERO CODE OF 'N’ INDICATES THAT AN ERROR WAS DETECTED 
IN PROCESSING THE N'TH PARAMETER IN THE COMMAND. 
NOTES 
NONE. 
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ccs - COMMON COMMAND SCAN ccs 


PURPOSE: 


CCS IS USED TO SCAN A PRIMARY COMMAND. IT DETERMINES THE NUMBER OF 
WORDS IN THE COMMAND AND BUILDS AN ARRAY WITH ONE ENTRY FOR EACH 
WORD. THE ENTRY CONTAINS A PTR TO THE WORD, THE LENGTH OF THE WORD, 
THE KEY/WORD CODE, IF THE WORD WAS FOUND IN THE PRIMARY COMMAND WORD 
TABLE, FLAGS TO INDICATE THE TYPE OF WORD (OR STRING) AND FLAGS TO 
INDICATE ANY ERROR CONDITIONS THAT WERE FOUND. 


INVOKED WITH: 
CALL TO CCS 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TCS x IN/OUT COMMAND SCAN TABLE 
WHERE 
TCS - COMMAND SCAN TABLE. FIELDS TCSCIP, TCSCISZ, AND 


TCSWDCT (MAX POSSIBLE VALUE) MUST BE FILLED IN BY THE 
CALLER. CCS WILL RETURN TCSWDCT CACTUAL) AND AN 
TSCWDS ENTRY FOR EACH WORD COR STRING) FOUND. 


RETURN CODES: 
0 - NORMAL RETURN. 


*N' - A NON-ZERO CODE OF 'N* INDICATES THAT AN ERROR WAS DETECTED 
FOR WORD ‘N* IN THE COMMAND. AN ERROR FLAG WILL BE SET IN THE 
"N' TH ENTRY TO INDICATE THE TYPE OF ERROR. POSSIBLE ERRORS ARE: 
- TCSIVSIZ = ON - HEX STRING CONTAINS ODD NUMBER OF DIGITS. 
- TCSIVHEX = ON - HEX STRING CONTAINS NON-HEX CHARACTERS. 


NOTES: 


CCS MOVES THE LINE TO A LOCAL AREA AND TRANSLATES IT TO UPPER CASE 
BEFORE SCANNING IT. 


POINTERS FOR QUOTED STRINGS POINT TO THE FIRST CHARACTER OF THE 
STRING, AND NOT TO THE QUOTE OR PREFIX CHARACTER. THE LENGTH 
TUE OUbT ES. STRING IS THE NUMBER OF CHARACTERS CONTAINED WITHIN 
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CDA 


- COMMON DATASET ALLOCATE ROUTINE 


PURPOSE: 


CDA 


CONCATENATE FROM TWO TO FOUR DATA SETS. 
OF EXISTING DATA SETS ONLY. OPTIONALLY, CDA WILL CLOSE AND FREE THE 
DATA SETCS) ASSOCIATED WITH A TFD, 


IS USED TO ALLOCATE A SINGLE DATA SET OR TO ALLOCATE AND 
CDA WILL HANDLE ALLOCATION 


INVOKED WITH: 
CALL TO CDA 


CALLING SEQUENCE PARAMETERS: 


RET 
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1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 
3. SMSG CHAR(C24) OUTPUT SHORT ERROR MESSAGE 
4. LMSG CHARC72) OUTPUT LONG ERROR MESSAGE 
WHERE 
TFD - FILE DEFINITION TABLE FOR THE FILE BEING ALLOCATED. 
SMSG ~ RETURN AREA FOR SHORT ERROR MESSAGE IF ERROR OCCURRED. 
LMSG - RETURN AREA FOR LONG ERROR MESSAGE IF ERROR OCCURRED. 
URN CODES: 
0 - NORMAL RETURN. 
1 - UNACCEPTABLE OR MISSING “PROJECT” CFAILED CBDSN). 
- PROBLEM FREEING OLD PROJECT.LIBI.TYPE. 
- PROBLEM ALLOCATING PROJECT.LIB1.TYPE. 
- PROBLEM CONCATENATING DATASETS. 
2 ~ UNACCEPTABLE OR MISSING "LIBI" CFAILED CBDSN}. 
3 - UNACCEPTABLE OR MISSING "LIB2" CFAILED CBDSN). 
- PROBLEM FREEING OLD PROJECT.LIB2.TYPE. 
- PROBLEM ALLOCATING PROJECT.LIB2.TYPE. 
~ CONCATENATION DATASETS HAVE UNLIKE DSORG. 
4 - UNACCEPTABLE OR MISSING "LIB3" CFAILED CBDSN). 
- PROBLEM FREEING OLD PROJECT.LIBS.TYPE. 
- PROBLEM ALLOCATING PROJECT.LIB3.TYPE. 
—- CONCATENATION DATASETS HAVE UNLIKE DSORG. 
5 - UNACCEPTABLE “LIB4¢" (FAILED CBDSN). 
- PROBLEM FREEING OLD PROJECT.LIB4.TYPE. 
- PROBLEM ALLOCATING PROJECT.LIB¢.TYPE. 
- CONCATENATION DATASETS HAVE UNLIKE DSORG. 
6 - UNACCEPTABLE OR MISSING "TYPE® CFAILED CBDSN). 
7 — UNACCEPTABLE “OTHER™ DSN CFAILED CBDSN). 
- PROBLEM FREEING "OTHER™ DATASET. 
- PROBLEM ALLOCATING "OTHER™ DATASET. 
8 ~ UNACCEPTABLE VOLUME SERIAL. 
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CCONTINUED ON NEXT PAGE) 


AND THEN ALLOCATE THE NEW FILE. 
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C 


CDA - COMNON DATASET ALLOCATE ROUTINE CCONTINUED ) CBA 


NOTES: 


IF RETURN CODE > 0 THEN MESSAGES ARE RETURNED IN SMSG AND LMSG AND NO 
DATASET(S) ASSOCIATED RITH THE TFD WILL BE ALLOCATED. 


cone CTFDMENUP -= 0), CDA WILL BUILD THE DSNAMEC(S) BY CALLING 


THE DAO& AND DAOC BLOCKS WILL BE CONSTRUCTED FOR THE DURATION OF CDA 
ONLY AND CDAIR WILL BE CALLED TO PERFORM THE ALLOCATE AND CONCATENATE 
FUNCTIONS. 


ERROR MESSAGES WILL BE OBTAINED FROM CDERR FOR ALLOCATION ERRORS, AND 
CMSG FOR CBDSN ERRORS. 


IF CDA IS CALLED WITH A TFD IN WHICH A FILE IS CURRENTLY DESCRIBED, 
CI.E., TFDDDNC1) IS NOT ZERO BITS), THEN CDA WILL COMPARE THE 
IDENTIFICATION CDSN'S, VOLUME, DISPOSITION, AND PASSWORD) OF THE 
CURRENT AND REQUESTED FILES AND, IF DIFFERENT, WILL CLOSE AND FREE 
THE CURRENT ALLOCATION, AND ALLOCATE THE REQUESTED FILE. 


IF CDA IS CALLED WITH MENU DATA CTFDMENUP -= 0), THEN ALLOCATION 
WILL BE FOR THE DATASET(S) DESCRIBED IN THE MENU DATA. 

OTHERWISE ALLOCATION WILL BE FOR THE DATASET DESCRIBED IN 
TFDDSNPC1) -> TFDDSNS. 


LICENSED MATERIAL - PROPERTY OF IBM PROGRAM ORGANIZATION 129 


CBaIR - COMNON DAIR INTERFACE ROUTINE . CDAIR 


PURPOSE: 
CDAIR SERVES AS THE. COMMON INTERFACE WITH THE DAIR MODULE “IKJEFDOO". 
IT HANDLES THE SPECIAL CASE OF A DATA SET ALLOCATED SHARED, BUT TO BE 
TREATED BY PCF CPROGRAM CONTROL FACILITY) AS OLD FOR PURPOSES OF 
VOLUME VERIFICATION: : 

INVOKED WITH: 


CALL TO CDAIR 


CALLING SEQUENCE PARAMETERS: 


1. TLD + <TLD® INPUT LOGICAL DISPLAY TABLE 
2. BLOCK : x IN/OUT = DAIR BLOCK 
WHERE oo | 

BLOCK” - IS A TSO DYNAMIC ALLOCATION INTERFACE ROUTINE (DAIR) 


CONTROL BLOCK (DA08,DA18, ETC.). 


RETURN CODE: 
RETURN CODE THAT IS RETURNED IN REG 15 FROM "IKJEFDOO". 


NOTES: 


IF A DAOS CALLOCATE) BLOCK IS ENCOUNTERED, AND IF BOTH THE 

SHR CDAQ8SSHR) AND OLD (DAO8SOLD) FLAG BITS ARE ON, A SPECIAL PCF 
INTERFACE IS RECOGNIZED, SINCE THIS COMBINATION IS INVALID AS INPUT 
TO DAIR. IN THIS CASE, THE DAG8SOLD BIT IS TURNED OFF BY CDAIR, 
AND A '01°*X IS STORED IN THE FIRST BYTE OF THE ECTSCMD FIELD 

AS A SIGNAL TO PCF THAT THIS SHR REQUEST SHOULD BE TREATED FOR 
VOLUME VERIFICATION PURPOSES AS AN OLD REQUEST. 


IF A DAO&S CALLOCATE) BLOCK IS ENCOUNTERED, AND IF THE VOLUME SERIAL 
FIELD IS BLANK CREQUEST FOR A CATALOGED DATA SET), A LOCATE MACRO 
IS ISSUED BY CDAIR TO FIND THE VOLUME SERIAL, AND CDT IS CALLED TO 
DETERMINE THE UNIT TYPE. THE VOLUME AND UNIT VALUES ARE PLACED IN 
THE DAQ& BLOCK BEFORE DAIR IS CALLED. 


IF A DA1& (FREE) BLOCK IS ENCOUNTERED, AND IF BOTH THE DELETE 
(DAL8NDL) AND UNCATALOG C(DAI18NUC) BIT FLAGS ARE SET, THE DATA SET 
WILL BE UNCATALOGED BY A CATALOG MACRO REQUEST AFTER DAIR HAS BEEN 
CALLED TO SCRATCH AND DEALLOCATE THE DATA SET. IN THIS CASE, THE 
TV iDRte FLAG BIT IS TURNED OFF BEFORE THE BLOCK IS PROCESSED 


CDAIR CAN EITHER LINK TO "IKJEFDOO" OR BRANCH DIRECTLY TO THE 
ADDRESS STORED IN TSIDAIRP. THE LATER CASE IS THE NORMAL CASE AND 
RESULTS IN IMPROVED PERFORMANCE. TSIDAIRP IS SET UP BY SMI WHICH 
LOADS "IKJEFDO00" AND THEN STORES ITS ADDRESS. IF TSIDAIRP < 4 
CBECAUSE SMI DID NOT LOAD “IKJEFDO0") THEN LINKING TAKES PLACE. 
THIS OPTION COULD SAVE STORAGE AT THE EXPENSE OF CPU OVERHEAD IF 
THE DAIR MODULES WERE NOT ALREADY IN THE LINK PACK AREA. 
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CDATE - COMMON CONVERT BATE ROUTINE CDATE 


PURPOSE: 
CDATE CONVERTS A FIXED POINT OR PACKED DECIMAL DATE TO EBCDIC. 


INVOKED WITH: 
CALL TO CDATE 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. DATEIN CHARC4) INPUT INPUT DATE 

3. DATEOUT CHAR(8) OUTPUT OUTPUT DATE 

WHERE 


DATEIN =~ THE INPUT DATE IN ONE OF THE FOLLOWING FORMATS: 


PACKED DECIMAL - ‘"CCYYDDDS' HEX: 
cc = *00" HEX 


YY = DECIMAL DIGITS FOR YEAR 
DDD = DECIMAL DIGITS FOR DAY OF YEAR 
S = PACKED DECIMAL SIGN CIGNORED) 


FIXED POINT - "CCYYDDDD’" HEX: 
cc "FF" HEX 


YY = BINARY VALUE FOR YEAR 

DDDD = BINARY VALUE FOR DAY OF YEAR 
DATEOQUT - THE OUTPUT DATE - "YY/MM/DD*" EBCDIC: 

YY = EBCDIC YEAR 

MM = EBCDIC MONTH 

DD = EBCDIC DAY 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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coc - COMMON DATASET CLOSE coc 


PURPOSE: 
coc IS USED TO CLOSE A FILE. THE FILE IS EXPECTED TO HAVE PREVIOUSLY 
OPENED BY CALLING CDO. IN ADDITION TO CLOSING THE DCB, THE CDC WILL 


OPTIONALLY CALL CRELS TO DEQ THE DATA SET RESOURCE AND OPTIONALLY 
CALL CSM TO FREEMAIN THE I/O BUFFER. 


INVOKED WITH: 
CALL TO CDC 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 
3. MSGID CHAR (4) OUTPUT ERROR MESSAGE ID CNOT USED) 
WHERE 
TFD - FILE DEFINITION TABLE FOR THE FILE BEING ALLOCATED. 
MSGID - ERROR MESSAGE ID IS PROVIDED FOR FUTURE POSSIBLE USE. 


RETURN CODES: 
0 - ALWAYS. 


NOTES: 
CDC WILL CLEAR THE DCB I/0 ERROR SWITCH BEFORE CLOSING THE DCB. 
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Cc CDERR 


- COMMON DAIR ERROR ROUTINE 


PURPOSE: 
CDERR IS CALLED AFTER AN ERROR IS ENCOUNTERED FROM THE TSO “"DAIR" 


ROUTINE. 


CDERR 


THEN OPTIONALLY INVOKES THE SPECIFIED ERROR HANDLING ROUTINE. 


INVOKED WITH: 


CALL TO CDERR 


CALLING SEQUENCE PARAMETERS: 


l. 


2 
Si 
4 
5 


TLD 
RETCODE 
DA0S8 
SHORT 
LONG 


WHERE 


RETCODE 
DA0S 


SHORT 
LONG 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


<TLD> INPUT 
FIXEDC15) INPUT 
% INPUT 


CHAR( 24) OUTPUT 
CHAR(72) OUTPUT 


LOGICAL DISPLAY TABLE 

DAIR RETURN CODE 

DA0& CONTROL BLOCK 

SHORT CLEVEL 1) ERROR MESSAGE 
LONG CLEVEL 2) ERROR MESSAGE 


IT DETERMINES THE SPF MESSAGE ID WHICH DESCRIBES THE ERROR, 


THE SAVED CONTENTS OF REGISTER 15 ON RETURN FROM DAIR. 
IS THE TSO DAIR DA0S CONTROL BLOCK, WHICH IS USED TO 


ALLOCATE A FILE. 


THIS PARAMETER IS USED TO RETURN SHORT ERROR MESSAGES. 
THIS PARAMETER IS USED TO RETURN LONG ERROR MESSAGES. 


THE SPF MESSAGES IDS USED BY CDERR TO GENERATE THE SHORT AND 
LONG ERROR MESSAGES ARE DOO1 THROUGH DO22. 
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COF - COMMON DATASET FREE ROUTINE COF 


PURPOSE: 
CDF IS USED TO FREE ALLOCATIONCS) OF A FILE PREVIOUSLY ALLOCATED 
USING CDA. THE FILE MAY CONSIST OF A SINGLE DATA SET OR A 
CONCATENATION OF TWO TO FOUR DATASETS. CDF WILL CALL CDC TO CLOSE 
THE DCB, IF NECESSARY, BEFORE CALLING CDAIR TO FREE THE ALLOCATION. 
INVOKED WITH: 


CALL TO CDF 


CALLING SEQUENCE PARAMETERS: 


l. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 

2. FD <TFD> IN/OUT FILE DEFINITION TABLE 

3. SMSG CHAR( 24) OUTPUT SHORT ERROR MESSAGE 

4. LMSG CHAR(C72) OUTPUT LONG ERROR MESSAGE 

WHERE 
TFD - FILE DEFINITION TABLE FOR THE FILE BEING FREED. 
SMSG - SHORT ERROR MESSAGE RETURNED WHEN RETURN CODE IS NOT 0. 
LMSG - LONG ERROR MESSAGE RETURNED WHEN RETURN CODE IS NOT 0. 


RETURN CODES: 
0 - NORMAL RETURN. 


1 - PROBLEM FREEING PROJECT.LIBI.TYPE. 

2 - PROBLEM FREEING PROJECT.LIB2.TYPE. 

3 - PROBLEM FREEING PROJECT.LIB3.TYPE. 

4 - PROBLEM FREEING PROJECT.LIB4¢.TYPE. 

5 ~- PROBLEM FREEING “OTHER™ DATASET. 
NOTES: 


CDF WILL FREE THE DDNAMES SAVED IN THE TFD BY CDA, BY CONSTRUCTING A 
DALS BLOCK AND CALLING CDAIR FOR EACH DDNAME TO BE FREED. 


IF A DAIR ERROR OCCURS, AN ERROR MESSAGE WILL BE PLACED IN THE SMSG 


AND LMSG FIELDS. AN ATTEMPT WILL BE MADE TO FREE ALL DDNAMES IN THE 
EVENT THAT ANY ERROR IS ENCOUNTERED. 
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coc - COMMON GET RECORD ROUTINE CoG 


PURPOSE: 
CDG IS USED TO READ A LOGICAL RECORD FROM A SEQUENTIAL DATA SET OR 
MEMBER OF A PDS AND OPTIONALLY NOTE THE TTR OF EACH BLOCK READ. 
CDG MAY ALSO BE USED FOR UPDATE IN PLACE OF A PDS. 

INVOKED WITH: 


CALL TO CDG 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 

2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 

WHERE 

TFD - IS A STRUCTURE WHICH INCLUDES THE FOLLOWING PARAMETERS: 

TFDRECP PTRC31) IN/OUT RECORD POINTER 
TFDRECL FIXEDC15) OUTPUT RECORD LENGTH 
TFDECODE FIXED(15) IN/OUT ENTRY CODE 
TFDTTRN CHAR(4) IN/OUT FIRST OR CURRENT TTRN 


PARAMETER USAGE 


TFDRECP - A ZERO VALUE ON INPUT TO CDG INDICATES "LOCATE" MODE, 
IN WHICH CASE CDG WILL RETURN A POINTER TO THE LOGICAL 
RECORD IN TFDRECP. CNOTE: LOCATE MODE MUST BE USED 
FOR UPDATE IN PLACE OF A PDS.) 


A NON-ZERO VALUE ON INPUT TO CDG INDICATES ‘MOVE’ 
MODE, IN WHICH CASE CDG WILL MOVE THE LOGICAL RECORD 
TO THE ADDRESS SPECIFIED BY TFDRECP. 


TFDRECL - QUTPUT PARAMETER ONLY. CONTAINS THE LENGTH OF THE 
LOGICAL RECORD RETURNED BY CDG. 


TFDECODE - INDICATES THE ENTRY CONDITION, AS FOLLOWS: 


0 - 1ST ENTRY TO CDG CFOR "STANDARD" MODE OF 
OPERATIONS). 1ST RECORD WILL BE RETURNED. 
THE TTRN OF THE FIRST BLOCK WILL BE STORED 
IN TFDTTRN. CDG WILL SET TFDECODE=1. 


1 - ITH ENTRY TO CDG. ITH RECORD WILL BE 
RETURNED. NO CHANGE TO TFDECODE. 


2 - RESET TO THE TTRN CONTAINED IN TFDTTRN 
CINVALID FOR UPDATE IN PLACE). 1ST RECORD 
STARTING AT THE NEW TTRN WILL BE RETURNED. 
CDG WILL SET TFDECODE=1. 


3 - CLOSE OUT. CDG WILL SET TFDECODE=0. 
NO RECORD IS RETURNED. 
NOTE: CLOSE OUT IS AUTOMATIC WHENEVER RETURN 
CODE > 0, EXCEPT WHEN ORIGINAL VALUE OF TFDECODE 
WAS 5 (SEE NOTES). 


CCONTINUED ON NEXT PAGE) 


‘LICENSED MATERIAL - PROPERTY OF IBM PROGRAM ORGANIZATION 135 
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CoG - COMMON GET RECORD ROUTINE ( CONTINUED ) CoG 


4 ~- 1ST ENTRY TO CDG FOR UPDATE IN PLACE. 2’ 
1ST RECORD WILL BE RETURNED. 
CDG WILL SET TFDECODE=1. 


5 - IST ENTRY TO CDG IF CURRENT TTRN FOR EACH 
RECORD IS TO BE RETURNED IN TFDTTRN. 
IST RECORD WILL BE RETURNED. 
CDG WILL SET TFDECODE=1. 
TFDECODE=5 IS USED BY BROWSE. 


RETURN CODE: 
0 - NORMAL COMPLETION. 


1 - END OF FILE CONDITION. NO RECORD WAS RETURNED. CDG HAS CLOSED 
ITSELF OUT UNLESS TFDECODE=5 WAS USED, IN WHICH CASE CLOSE OUT 
IS NOT AUTOMATIC ON END OF FILE. 


2 - UNRECOVERABLE I/70 ERROR. NO RECORD WAS RETURNED. CDG HAS 
CLOSED ITSELF OUT UNLESS TFDECODE=5 WAS USED, IN WHICH CASE 
CLOSE OUT IS NOT AUTOMATIC ON I/O ERROR. (CNOTE: RETURN CODE 
ALSO SET TO 2 IF CERTAIN USER ERRORS ARE DETECTED.) 


NOTES: 
THIS MODULE HAS REPLACED THE SPF VERSION 2.1 CGET SUBROUTINE. 


IT IS ASSUMED THAT CALLERS OF CDG HAVE PREVIOUSLY ALLOCATED AND 
OPENED THE DATASET BY CALLING EITHER CTA OR CDA AND CDO. 


CDG ALWAYS RETURNS THE TTRN OF THE FIRST BLOCK, TO ALLOW THE 

DATA SET OR MEMBER TO BE RE-READ FROM THE TOP (SEE TFDECODE=2). * 
OPTIONALLY, CDG MAY BE INITIALIZED TO RETURN THE CURRENT TTRN FOR ») 
EACH RECORD AS IT READS THROUGH THE DATA (SEE TFDECODE=5). 


FOR VARIABLE LENGTH RECORDS, THE TFDRECP AND TFDRECL PARAMETERS 
REFER TO THE DATA PORTION ONLY, I.E. THEY EXCLUDE THE FOUR BYTE 
RECORD PREFIX AREA. 


FOR UNDEFINED RECORD FORMAT CRECFM=U), THE RECORD LENGTH RETURNED 
IN TFDRECL IS THE SIZE OF THE PHYSICAL BLOCK. 


ON CLOSE OUT, CDG DOES NOT CLOSE THE DATA SET; TO REUSE CDG FOR A 
DIFFERENT MEMBER OF THE SAME PDS, THE FOLLOWING STEPS ARE REQUIRED: 


1. CLOSE OUT CDG (TFDECODE=3) IF IT HAS NOT ALREADY CLOSED 
ITSELF OUT. 

2. ISSUE FIND MACRO FOR NEW MEMBER. 

3. CALL CDG (CTFDECODE=0) TO START READING NEW MEMBER. 


THE ONLY USER ERROR WHICH WILL CAUSE RETURN CODE = 2 IS FOR CDG 
TO BE CALLED WITHOUT FIRST CALLING CDO. TFDOPN MUST BE ON. 


IF THE ORIGINAL TFDECODE WAS 0 OR 4, TFDECODE WILL BE RESET 
TO ZERO FOR ANY CONDITION WHICH RESULTS IN A NON-ZERO RETURN CODE. 


IF THE ORIGINAL TFDECODE WAS 5, AND AN END OF FILE OR I/70 ERROR 
OCCURS, TFDECODE WILL BE SET TO l. 


CDG USES BSAM I7/0. 
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CDISPL -=- COMMON DISPLAY ROUTINE COISPL 


PURPOSE: 


CDISPL IS USED TO DISPLAY THE CURRENT CONTENTS OF THE TLD/TLS 
AND WAIT FOR USER RESPONSE (POST DISPLAY REQUEST ECB AND WAIT ON 
PROCESS REQUEST ECB). 


INVOKED WITH: 
CALL TO CDISPL 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> IN/OUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


CDISPL SCANS THE TLS INPUT LINE (LINE 2) .FOR AN ATTRIBUTE BYTE 
INDICATING THE BEGINNING OF THE TLSINPUT FIELD CIF ANY) AND 
INITIALIZES THE TLD POINTER CTLDIDABP) ACCORDINGLY. 


AFTER THE USER RESPONSE, CDISPL PERFORMS THE FOLLOWING: 


IF THE HELP PFK WAS PRESSED AND THE TLDHELP FIELD IS NOT BLANK: 
CHELP IS CALLED. 


IF A PRIMARY COMMAND PFK WAS PRESSED: 
THE ASSOCIATED COMMAND IS RETRIEVED FROM THE TKV AND PLACED 
IN THE TLSINPUT FIELD. 


IF A LINE COMMAND PFK WAS PRESSED: 
THE ASSOCIATED COMMAND IS RETRIEVED FROM THE TKV AND PLACED 
IN THE TLS EDIT LINE COMMAND FIELD. 


IF THE RETURN PFK WAS PRESSED: 
CDISPL INTERFACES WITH THE CALLING PROGRAMS AS THOUGH THE END KEY 
HAD BEEN PRESSED, BUT WITHOUT INTERFACING WITH THE SPF MAIN TASK, 
AND THUS WITHOUT CAUSING ANY ACTUAL DISPLAY OUTPUT. PMD STOPS 
THIS FUNCTION WHEN IT GETS CONTROL. 


IF ANY DISPLAYABLE INPUT FIELD HAS AN EXTENDED RETURN VALUE (A 
PRIMARY OPTION VALUE) PRECEEDED BY AN EQUAL SIGN (=) THEN IT WILL 
BE PLACED IN THE TLSINPUT FIELD WHEN THE PRIMARY OPTION MENU IS 
DISPLAYED. CDISPL WILL THEN RETURN TO PMD AS THOUGH THE ENTER 
KEY HAD BEEN PRESSED. 


IF THE SCROLL FIELD WAS MODIFIED: 
THE MDT BIT FOR THE SCROLL FIELD IS SET TO OFF. 


IF A SCROLL PFK WAS PRESSED AND THE TLSINPUT FIELD CONTAINS A 
SCROLL AMOUNT: 
THE NEW AMOUNT IS MOVED TO THE SCROLL FIELD AND THE MDT BIT FOR 
THE INPUT FIELD IS SET TO OFF. THIS HAS THE EFFECT OF A 
TEMPORARY CHANGE TO THE SCROLL FIELD JUST FOR THIS INTERACTION. 


NOTE: WHENEVER CDISPL MODIFIES AN MDT (MODIFIED DATA TAG) IN THE 
TLS, IT ADJUSTS THE MDT COUNT IN THE TLD ACCORDINGLY. 
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coo - COMMON DATA CPEN ROUTINE : co0 


PURPOSE: 2) 


CDO IS USED TO OPEN A FILE.. THE FILE IS EXPECTED TO HAVE PREVIOUSLY 
BEEN ALLOCATED BY CALLING CDA OR CTA. IF THE FILE IS AN EMPTY 
SEQUENTIAL DATASET BEING OPENED FOR INPUT CAN INVALID THING TO DO), 
THE DSCB WILL BE READ TO OBTAIN DATASET ATTRIBUTES, BUT OPEN WILL NOT 
BE DONE. OPTIONALLY CDO WILL VALIDATE DATASET ATTRIBUTES AS REQUIRED 
BY THE CALLER. VALID COMBINATIONS OF DSORG, LRECL, BLKSIZE AND 
RECORD FORMAT WILL BE CHECKED. CDO WILL OPTIONALLY CALL CRESV TO 
ISSUE A SHARED DASD RESERVE AGAINST THE DATA SET. CDO WILL ALSO 
OPTIONALLY CALL CSM TO GETMAIN SPACE FOR AN I/O BUFFER. 


INVOKED WITH: 
CALL TO CDO 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 

2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 

3. MSGID CHAR(4) OUTPUT ERROR MESSAGE ID 

WHERE 
TFD - THE FILE DEFINITION TABLE FOR THE FILE BEING OPENED. 
MSGID - CONTAINS ID OF ERROR MESSAGE ON ABNORMAL RETURN. 


OTHERWISE, THE MSGID WILL NOT BE MODIFIED. 


RETURN CODES: oS) 
0 - NORMAL RETURN. 
4 - ERROR RETURN (CMSGID CONTAINS THE ERROR MSG ID). 


NOTES: 


ON AN ABNORMAL RETURN, THE DCB WILL BE CLOSED AND CRELS WILL BE 
CALLED, IF NECESSARY, TO RELEASE THE DATA SET RESOURCE. 
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COP - COMMON DATA PUT ROUTINE coP 


PURPOSE: 


CDP IS USED TO OUTPUT A LOGICAL RECORD TO A SEQUENTIAL DATA SET OR 
MEMBER OF A PDS. CDP WILL OPTIONALLY NOTE THE TTR OF A PHYSICAL 
BLOCK WRITTEN. CDP USES BSAM I/O. 


INVOKED WITH: 
CALL TO CDP 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 
WHERE 
TFD - IS A STRUCTURE WHICH INCLUDES THE FOLLOWING PARAMETERS: 
TFDRECP PTRC313 INPUT RECORD POINTER 
TFDRECL FIXEDC15) INPUT RECORD LENGTH 


TFDECODE FIXED(15) IN/OUT ENTRY CODE 


PARAMETER USAGE 
TFDRECP - CONTAINS A POINTER TO THE LOGICAL RECORD. CDP 
SUPPORTS ‘MOVE’ MODE ONLY FOR RECFM=F OR RECFM=V AND 
*LOCATE' MODE ONLY FOR RECFM=U DATA. 
TFDRECL - IS THE LENGTH OF THE LOGICAL RECORD IN BYTES. 
TFDECODE - IS AN ENTRY CODE, AS FOLLOWS: 


0 ~- 1ST ENTRY TO CDP. 1ST RECORD WILL BE OUTPUT. 
CDP WILL SET TFDECODE=1. 


1 - 'I'TH ENTRY TO CDP. ITH RECORD WILL BE OUTPUT. 
TFDECODE WILL NOT BE CHANGED. 


2 - CLOSE OUT. CDP WILL WRITE THE FINAL BLOCK, IF 


NECESSARY AND SET TFDECODE=0. NOTE: CLOSE OUT 
IS AUTOMATIC WHENEVER RETURN CODE > 0. 


RETURN CODE: 
0 - NORMAL COMPLETION. 
2 - UNRECOVERABLE I70 ERROR. CDP HAS CLOSED ITSELF OUT. 
CCONTINUED ON NEXT PAGE) 
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COP - COMMON DATA PUT ROUTINE ( CONTINUED} COP 


NOTES: 
THIS MODULE HAS REPLACED THE SPF VERSION 2.1 CPUT SUBROUTINE. 


IT IS ASSUMED THAT CALLERS OF CDP HAVE EITHER PREVIOUSLY ALLOCATED 
AND OPENED THE DATA SET BY CALLING CDA AND CDO OR BY CALLING CTA. 
THIS ASSURES THAT THE TFD IS INITIALIZED PROPERLY. 


FOR VARIABLE LENGTH RECORDS, THE TFDRECP AND TFDRECL PARAMETERS 
REFER TO THE DATA PORTION ONLY, I.E. THEY EXCLUDE THE FOUR BYTE 
RECORD PREFIX AREA. CDP WILL AUTOMATICALLY CONSTRUCT THE RECORD 
AND BLOCK PREFIXES IN THE OUTPUT BUFFER. 


THE RECORD LENGTH INDICATED BY TFDRECL NEED NOT AGREE WITH THE DCB 
LRECL. FOR FIXED RECORD FORMATS, CDP WILL EITHER TRUNCATE OR PAD 
WITH BLANKS TO MAKE THE RECORD LENGTH EQUAL THE DCB LRECL. FOR 
VARIABLE RECORD FORMATS, CDP WILL TRUNCATE IF THE LOGICAL RECORD 
LENGTH EXCEEDS DCB LRECL-4%. IN ADDITION, CDP WILL AUTOMATICALLY 
REMOVE ANY TRAILING BLANKS FOR VARIABLE LENGTH RECORDS. 


FOR UNDEFINED RECORD FORMAT CRECFM=U), TFDRECL MUST SPECIFY THE 
SIZE OF THE PHYSICAL BLOCK. FOR RECFM=U, CDP WRITES THE BLOCK 
DIRECTLY FROM THE AREA SPECIFIED VIA TFDRECP, AND ISSUES A CHECK 
IMMEDIATELY FOLLOWING THE WRITE. 


ON CLOSE OUT, CDP DOES NOT WRITE END-OF-FILE NOR DOES IT CLOSE THE 
DATA SET, IT SIMPLY FLUSHES THE I/0 BUFFER. TO REUSE CDP FOR A 
DIFFERENT MEMBER OF THE SAME PDS: 


1. CALL CDP FOR CLOSE OUT CTFDECODE=2) TO FLUSH THE BUFFER. 


2. ISSUE STOW MACRO FOR THIS MEMBER. 
3. CALL CDP CTFDECODE=0) TO START WRITING NEW MEMBER. 
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C_ 


COT 


PUR 


INV 


CAL 


RET 


NOT 


- COMMON DEVICE TYPE ROUTINE CDT 


POSE: 


CDT IS USED TO OBTAIN THE DEVICE TYPE OF A VOLUME, WHEN THE VOLUME 
SERIAL OR DEVICE CODE IS KNOWN. THE DEVICE TYPE IS RETURNED IN 
CHARACTER FORMAT. 


OKED WITH: 

CALL TO CDT 

LING SEQUENCE PARAMETERS: 

1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 

2. VOLUME CHAR(6) INPUT VOLUME SERIAL OR DEVICE CODE 
3. DEVICE CHARC8) OUTPUT DEVICE TYPE 

4. OPTION FIXED(31) INPUT OPTION CODE 

WHERE 


VOLUME - IF THE FIRST TWO BYTES ARE X*FFFF* THEN THE NEXT FOUR 
BYTES ARE ASSUMED TO BE THE CATALOG DEVICE CODE FOR 
THE VOLUME. IF THE FIRST TWO BYTES ARE X*FFFE‘ THEN 
THE NEXT FOUR BYTES ARE ASSUMED TO BE THE UCB DEVICE 
CODE FOR THE VOLUME. OTHERWISE, THE FIELD IS ASSUMED 
TO BE THE ACTUAL VOLUME SERIAL. 


DEVICE =- VALUE FROM THE SYSTEM DEVICE NAME TABLE '‘DEVNAMET' 
CE.G. "3330" OR '2314"), "3330V", OR BLANK. 


OPTION - 0 OR 1. 


URN CODE: 
0 - ALWAYS. 


ES: 


IF THE OPTION VALUE IS 0, THEN BLANK IS RETURNED AS THE DEVICE 
TYPE. IF THE OPTION IS 1, THEN THE FOLLOWING NOTES APPLY. ALL 
THE CALLS TO CDT BY THE DISTRIBUTED SYSTEM USE OPTION 1. 


IF THE VOLUME SERIAL IS SUPPLIED THEN THE UCBS ARE SEARCHED TO FIND 
THE DEVICE CODE. IF THE DEVICE CODE IS NOT FOUND AND THERE IS A 
MASS STORAGE SYSTEM (MSS) AVAILABLE, THE DEVICE TYPE RETURNED IS 
"3330V". IF THE CODE IS NOT FOUND AND THERE IS NO MSS, BLANK IS 
RETURNED AS THE DEVICE TYPE. 


THE DEVICE CODE FOR A CATALOGED DATA SET IS AVAILABLE THROUGH THE 
CATALOG VIA THE LOCATE MACRO AND THEN CAN BE USED AS INPUT TO CDT. 


ONCE CDT HAS A DEVICE CODE, THEN THE SYSTEM DEVICE NAME TABLE 
(MODULE NAME *DEVNAMET') IS SEARCHED FOR A DEVICE TYPE (E.G. '3330' 
OR '2314'). IF CDT FINDS NO CORRESPONDING DEVICE TYPE FOR A DEVICE 
CODE, A BLANK IS RETURNED. 
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CERR = COMMON ERROR DISPLAY ROUTINE CERR. 


PURPOSE: 


CERR IS USED TO FORMAT AND DISPLAY SPF MESSAGES. THE MESSAGE IS READ 
AND FORMATTED BY CMSG. A SHORT MESSAGE OF UP TO 24 CHARACTERS IS 
FIRST DISPLAYED IN THE UPPER RIGHT HAND CORNER OF THE LOGICAL SCREEN. 
IF THE SPF USER RESPONDS BY PRESSING THE HELP KEY, A 2ND LEVEL 
MESSAGE OF UP TO 77 CHARACTERS IS DISPLAYED ON THE THIRD LINE OF THE 
DISPLAY. IF THE SPF USER AGAIN RESPONDS BY PRESSING THE HELP KEY, 
CHELP IS CALLED BY CDISPL TO DISPLAY TUTORIAL INFORMATION. 


INVOKED WITH: 
CALL TO CERR 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 

2. MSGID CHAR(4) INPUT MESSAGE ID 

3. PARMI % INPUT MESSAGE PARAMETER 1 
PARMN % INPUT MESSAGE PARAMETER 'N* 

WHERE 


PARM(S) - PARMI1 THROUGH PARMN CAN BE IN ANY FORMAT THAT CAN BE 
HANDLED BY CMSG IN FORMATTING MESSAGES. THE PARAMETERS 
NEED NOT BE ACTUALLY REFERENCED BY A MESSAGE. A 
MAXIMUM OF 50 PARAMETERS IS SUPPORTED. 
RETURN CODE: 


0 - ALWAYS. 


NOTES: 
THE CERR PARAMETER LIST MUST BE TERMINATED WITH A VLIST FLAG. 
ON EXIT, CERR RESTORES THE SCREEN TO ITS CONDITION AT ENTRY TO CERR. 
CERR CALLS CMSG TO OBTAIN THE REQUESTED MESSAGE. 
CALL CNSG, BUT FILLS THE SHORT MESSAGE AREA WITH DASHES AND AND 


DISPLAYS THE SCREEN. IN THIS CASE, NO 2ND LEVEL MESSAGE IS 
PROCESSED. . 
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CFI - COMMON FIND ROUTINE CFI 


PURPOSE: 
CFI IS USED TO FIND MEMBERS OF THE SPFMENUS, SPFMSGS, AND SPFPROCS 
DATA SETS. CFI MAINTAINS BLDL LISTS LOCATED IN THE FIND TABLE (TFI) 
FOR THE DATA SETS, THUS ELIMINATING MOST PDS DIRECTORY SEARCHES FOR 


THESE DATA SETS. IF THE REQUESTED MEMBER IS NOT IN THE TFI, CFI 
ISSUES A BLDL AND THEN A FIND MACRO. 


INVOKED WITH: 
CALL TO CFI 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TFD <TFD> INPUT FILE DEFINITION TABLE 
3. MEMBER CHAR (8) INPUT SEARCH MEMBER NAME 
WHERE 

TFD - THE TFD FOR THE DATA SET TO BE SEARCHED. 


MEMBER - IS THE MEMBER FOR WHICH THE FIND IS TO BE DONE. 


RETURN CODE: 
0 - NORMAL RETURN, MEMBER FOUND. 
4 - MEMBER NOT FOUND. 
8 - I70 ERROR RETURN FROM BLDL. 


NOTES: 


THE CALLING PROGRAM MUST SET UP THE TFD AND OPEN THE DATA SET BEFORE 
CALLING CFI. 


SEE THE DATA AREAS SECTION FOR A DESCRIPTION OF THE FIND TABLE CTFI). 
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CHe - COMMON HARDCOPY ROUTINE : CHC 


PURPOSE: 
CHC PERFORMS THE HARDCOPY FUNCTION FOR UOL AND USC. 


INVOKED WITH: 
CALL TO CHC 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 
3. MENU CHAR(8) INPUT MENU NAME 
WHERE 
MENU ~- IS THE NAME OF THE MENU TO BE DISPLAYED BY CHC. 


RETURN CODE: 
0 - ERROR RETURN 
4 ~ DELETE REQUESTED 
8 - KEEP REQUESTED 


NOTES: 
NONE. 
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CHELP - COMMON HELP ROUTINE CHELP 


PURPOSE: 
CHELP IS USED TO INVOKE THE SPF TUTORIAL STARTING AT A SPECIFIC PAGE. 
THE TLS AND APPROPRIATE TLD FIELDS ARE SAVED BEFORE INVOKING THE 
TUTORIAL, AND RESTORED BEFORE RETURNING. WHEN CHELP IS INVOKED, THE 
USER MAY PAGE THROUGH THE TUTORIAL AS DESIRED. WHEN HE ENDS THE 
TUTORIAL, THE SCREEN IS RESTORED. 

INVOKED WITH: 


CALL TO CHELP 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
WHERE 
TLD - TLDHELP CCHARC8)) CONTAINS THE MEMBER NAME OF THE 


FIRST TUTORIAL PAGE TO BE DISPLAYED. 


RETURN CODE: 
0 - SPFTUTOR WAS INVOKED. 
4 - SPFTUTOR WAS NOT INVOKED BECAUSE THE TLDHELP FIELD CONTAINED 
AN INVALID MEMBER NAME. 
NOTES: 
NONE. 
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CHP J - COMMON HARDCOPY PRINT JCL ROUTINE 


PURPOSE: 


CHPJ IS USED TO PRINT A SPECIFIED DATA SET VIA A BACKGROUND JOB. 


CHPJ GENERATES JCL FOR A JOB STEP AND WRITES THE JCL 
DATA SET C'USERID.SPFTEMP®.CNTL"'). 


JCL IS TAKED FROM THE SPFPROCS DATA SET (MEMBER CHP J). 


INVOKED WITH: 
CALL TO CHPJ 


CALLING SEQUENCE 


1. TLD 
2 DSNS 

3 VOLUME 
4 DEVICE 
5. DISP 

6 SCLAS 

7 RECFM 

8 LRECL 
9. BLKSIZE 
10. OPTJ 


VOLUME 
DEVICE 


DISP 


SCLAS 
RECFM 


LRECL 
BLKSIZE 


OPTJ 
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PARAMETERS: 

<TLD> INPUT LOGICIAL DISPLAY TABLE 
CHAR(58) INPUT DATA SET NAME STRUCTURE 
CHAR(6) INPUT VOLUME SERIAL NUMBER 
CHARC8) INPUT DEVICE TYPE 

CHAR(1) INPUT DATA SET DISPOSITION 
CHARC15) INPUT SYSOUT CLASS 

CHAR(6) INPUT OUTPUT RECORD FORMAT 
FIXEDC(15) INPUT OUTPUT LOGICAL RECORD LENGTH 
FIXEDC15) INPUT OUTPUT BLOCK SIZE 
CHAR) INPUT OUTPUT OPTCD 


THE DATA SET NAME STRUCTURE (STANDARD DAIR FORMAT). 
E.G., DCL 1 DSNS, 
2 DSNL FIXED(15), 7% DSNAME LENGTH */ 
2 DSN CHARC56);3 7% DSNAME %/ 
NOTE: THE DSN MAY INCLUDE A MEMBER NAME IN PARENS. 


THE SERTAL NUMBER OF VOLUME THAT THE DATA SET IS ON, 
IF IT IS NOT CATALOGED. 


THE TYPE OF THE DEVICE THAT THE DATA SET IS ON, 
IF IT IS NOT CATALOGED. 


A CODE THAT INDICATES THE REQUESTED DISPOSITION OF 
THE DATA SET AFTER PRINTING: 

'D* = DELETE 

"K*® - KEEP 
THE SYSOQUT CLASS USED FOR THE OUTPUT OF THE PRINT ST 


THE DATA SET RECORD FORMAT, WHICH IS USED TO CONTROL 
THE OUTPUT OF THE PRINT STEP. 


THE DATA SET LOGICIAL RECORD LENGTH, WHICH IS USED 
TO CONTROL THE OUTPUT OF THE PRINT STEP. 


THE DATA SET BLOCK SIZE, WHICH IS USED TO CONTROL 
THE OUTPUT OF THE PRINT STEP. 


THE OPTCD VALUE FOR THE 3800, 'J* OR BLANK. 
(CONTINUED ON NEXT PAGE) 


CHP J 


TO THE TEMPCNTL 
THE PROTOTYPE FOR THE GENERATED 


EP. 
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CHP J - COMMON HARDCOPY PRINT JCL ROUTINE ( CONTINUED ) CHP J 


RETURN CODE: 
0 - NO ERRORS DETECTED. 
1-39 - CDP ERROR RETURN CODE WRITING TO TEMPCNTL DATA SET. 
40 - CHPJ MEMBER NOT FOUND IN PROCS DATA SET. 
44 - 170 ERROR READING SPFPROCS MEMBER CHP J. 
48 - CMSG ERROR CONSTRUCTING A CARD FROM THE MODEL. 


NOTES: 


THE CALLING SEQUENCE PARAMETERS REFER TO THE DATA SET TO BE PRINTED, 
NOT THE TEMPCNTL DATA SET. 
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CHPL - COMMON HARDCOPY PRINT LOCAL ROUTINE CHPE 
PURPOSE: 

CHPL IS USED TO ROUTE A SPECIFIED DATA SET TO A LOCAL PRINTER 

VIA DSPRINT. 


INVOKED WITH: 
CALL TO CHPL 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICIAL DISPLAY TABLE 
2. ENTCODE FIXEDC31) INPUT CHPL ENTRY CODE 

3. DSNS CHARC58) INPUT DATA SET NAME STRUCTURE 
4. PSWD CHARC8) INPUT DATA SET PASSWORD 

5. LPID CHAR(8) INPUT LOCAL PRINTER ID 

WHERE 


ENTCODE - THE ENTRY CODE TO CHPL: 


0 - NO CARRIAGE CONTROL CHARACTERS IN THE INPUT 
DATA SET, USE DSPRINT'S DEFAULTS. 

1 -—- CARRIAGE CONTROL CHARACTERS PRESENT IN THE 
INPUT DATA SET, INDICATE SUCH TO DSPRINT. 


DSNS - THE DATA SET NAME STRUCTURE CSTANDARD DAIR FORMAT). 
E.G., DCL 1 DSNS, 
2 DSNL FIXED(15), 7% DSNAME LENGTH ¥/ 


2 DSN CHARC56); 7¥*® DSNAME %/ 
NOTE: THE DSN MAY INCLUDE A MEMBER NAME IN PARENS. 
PSWD - THE PASSWORD, IF THE DATA SET TO BE PRINTED IS 
PASSWORD PROTECTED. 
LPID -~ LOCAL PRINTER ID KNOWN BY DSPRINT. 


RETURN CODE: 
0 - NO ERROR DETECTED. 
4 ~ THE USER ATTENTIONED OUT OF DSPRINT. 
8 - DSPRINT ABENDED. 
12 - DSPRINT HAD A RETURN CODE GREATER THAN ZERO. 


NOTES: 
NONE. 
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CIPARMS =- COMMON INITIALIZE USER PARANETERS ROUTINE CIPARMS 


PURPOSE: 
CIPARMS GETMAINS THE AREA FOR THE SPF TABLE OF KEYWORD VALUES C(TKV) 
AND INITIALIZES IT WITH A MEMBER OF THE SPF PARMS DATA SET. THE 
MEMBER HAS THE SAME NAME AS THE USERS TSO LOGON ID. 

INVOKED WITH: 


CALL TO CIPARMS CFROM SMI) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - PARMS MEMBER READ AND PROCESSED. NO ERRORS DETECTED. 


1 - PARMS MEMBER READ AND CONVERTED FROM SPF VERSION 2.1 FORMAT. 
NO ERRORS DETECTED. 


- NO PARMS MEMBER READ, NEW MEMBER CREATED. NO ERRORS DETECTED. 

- NO PARMS MEMBER READ, NO NEW MEMBER CREATED. NO ERRORS DETECTED. 
- OPEN ERRGR OPENING PARMS DATA SET TO OUTPUT NEW MEMBER. 

DIRECTORY FULL ERROR ATTEMPTING TO STOW NEW MEMBER. 

- I/0 FIND ERROR FINDING PARMS MEMBER. 

I/O READ ERROR READING PARMS MEMBER. 

I/O STOW ERROR STOWING DIRECTORY ENTRY FOR NEW MEMBER. 

I/7Q WRITE ERROR WRITING NEW MEMBER TO PARMS DATA SET. 

DATA SET FULL ERROR ATTEMPTING TO WRITE NEW MEMBER. 


W~ =~ wo OF NN BD Ww Ww NN 
nN oe 
i @ Ff 1% i 


NOTES: 


IF THE PARMS MEMBER WAS CREATED BY SPF VERSION 2.1 IT IS CONVERTED 
TO THIS VERSION'S FORMAT BY SPC CVIA LINK TO SPFSPC). 


IF THE PARMS MEMBER IS NOT FOUND, DEFAULT VALUES FROM A COMPILED 
VERSION OF THE TKV ARE USED TO INITIALIZE THE TKV. IF THERE ARE 
NO OTHER ERRORS, THIS DEFAULT TKV IS WRITTEN TO THE PARMS DATA SET. 


AFTER THE TKV IS INITIALIZED THE SUBROUTINE SIP (SPF INPUT PARMS) IS 
CALLED. SIP WAS DESIGNED AS A USER EXIT ROUTINE AND CAN BE MODIFIED 
IF AN INSTALLATION REQUIRES THAT DATA BE VERFIED OR MODIFIED BEFORE 
BEING USED BY SPF. SIP ALSO COPIES SOME DATA FROM THE TKV TO THE 
TSV¥V. FOR MORE INFORMATION SEE THE DESCRIPTION OF SIP. 


RETURN CODES 5 TO 12 ARE ERROR CODES. THEY WILL CAUSE AN 
INITIALIZATION ERROR MENU TO BE DISPLAYED WHEN PMD IS FIRST EXECUTED, 
BUT FOLLOWING THAT SPF WILL CONTINUE PROCESSING. 


FOR RETURN CODES 3 TO 12 DEFAULT TKV VALUES ARE USED DURING THE 
SESSION BUT WILL NOT BE REMEMBERED FOR THE NEXT SESSION. 
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CIR ~- COMMON READ PDS DIRECTORY ROUTINE CIR 
PURPOSE: 
CIR READS PDS DIRECTORY ENTRIES AND RETURNS THE INFORMATION TO THE 
CALLER. IT IS USED BY THE LIBRARY AND DATA SET UTILITIES. 


INVOKED WITH: 
CALL TO CIR 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. FD <TFD> IN/OUT FILE DEFINITION TABLE 
3. WORK PTRC31) IN/OUT WORK AREA 
WHERE 
TFD - TFDBLDLP POINTS TO A BLDL LIST IN THE SAME FORMAT 
AS THAT REQUIRED BY THE OS/VS BLDL MACRO. 
WORK - A FULL WORD WHICH CIR USES TO POINT TO A WORK 


AREA BETWEEN CALLS. THE CALLER MUST SET THIS WORD 
TO ZERO BEFORE THE FIRST CALL TO CIR. OTHERWISE 
IT IS OF NO CONCERN TO THE CALLER. 


RETURN CODE: 
0 - NO ERRORS DETECTED. 


4 - I70 ERROR READING DIRECTORY. 
8 - UNABLE TO OPEN DCB FOR DIRECTORY READ. 


NOTES: 


CIR READS THE PDS DIRECTORY SEQUENTIALLY. IT RETURNS ONE DIRECTORY 
ENTRY TO THE CALLER ON EACH CALL. 


THE CALLER SETS UP A BLDL FORMAT LIST CPOINTED TO FROM TFDBLDLP) 
WITH THE NUMBER OF ENTRIES SET TO ONE AND THE ENTRY LENGTH FILLED 
IN, TO DESCRIBE TO CIR HOW MUCH DATA TO RETURN ON EACH CALL. CIR 
FILLS IN THE REMAINDER OF THE BLDL LIST FOR THE ENTRY. CIR MAY BE 
CALLED REPEATEDLY UNTIL ALL DIRECTORY ENTRIES HAVE BEEN READ. 


AFTER THE ENTIRE DIRECTORY HAS BEEN READ, CIR RETURNS A TRAILER 
ENTRY, INDICATED BY THE FIRST 4 BYTES OF THE MEMBER NAME BEING 
X'FFFFFFFFY. THE NEXT TWO BYTES THEN CONTAIN THE TOTAL NUMBER OF 
DIRECTORY BLOCKS, AND THE LAST 2 BYTES CONTAIN THE NUMBER OF USED 
DIRECTORY BLOCKS. 
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cry - COMMON READ VTOC ROUTINE 


t 


PURPOSE: 


CIV OBTAINS VTOC AND DIRECTORY INFORMATION ABOUT THE DATA SET 
SPECIFIED IN THE TFD AND PLACES IT IN THE CIV COMMON AREA. 


INVOKED WITH: 
CALL TO CIV 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. FD <TFD> IN/OUT FILE DEFINITION TABLE 
3. COMM <CIV> OUTPUT CIV COMMON AREA 

4. OPTION FIXED(31) INPUT OPTION 

WHERE 


OPTION - CONTROL CIV PROGRAM AS FOLLOWS: 
0 - NORMAL PROCESSING. 
1 - NO PARTITIONED DATA SET DIRECTORY INFORMATION 
RETURN CODE: 
0 - NO ERRORS DETECTED. CIV COMMON AREA IS COMPLETE. 
>0 - OBTAIN OF VTOC INFORMATION FAILED. THE OBTAIN MACRO RETURN 


CODE IS PASSED BACK AS THE CIV RETURN CODE. THE CIV COMMON 
IS SET TO ZEROS. 


NOTES: 
NONE. 
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cJc 


PUR 


INV 


CAL 


RET 


NOT 


- COMMON JOB CARD ROUTINE cc 


POSE: 2 


CJC IS USED TO WRITE JOBCARD IMAGES TO THE TEMPORARY CONTROL CARD 
DATA SET C*'USERID.SPFTEMP®.CNTL*). UP TO 'FOUR RECORDS ARE WRITTEN.- 


OKED WITH: 

CALL TO CJC 

LING SEQUENCE PARAMETERS: 

1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 

2. JOBCARDS (4)CHARC72) INPUT JOBCARD IMAGES CFROM MENU) 
URN CODE: 


0 - NORMAL COMPLETION. 
NON-ZERO ~- ABNORMAL COMPLETION CRETURN CODE PASSED THROUGH FROM CDP). 


ES: 


BEFORE CJC IS CALLED, THE CONTROL CARD TEMPORARY DATA SET MUST BE 
ALLOCATED AND OPENED BY CALLING CTA. CJC WILL INITIALIZE THE 
FOLLOWING FIELDS OF THE TFD BEFORE CALLING CDP: 


TFDRECP = ADDR(CJC OUTPUT BUFFER) ) 
TFDRECL = 80 
TFDECODE = 0 


THE CALLING PROGRAM MUST USE CDP TO WRITE OUT ADDITIONAL JCL TO 
THE TEMPORARY DATSET, LATER CLOSEOUT CDP, AND CLOSE THE TEMPORARY 
DATA SET BEFORE SUBMITTING THE JCL TO OS BY CALLING THE CSB ROUTINE. 


CJC DOES NOT SYNTAX CHECK THE JOBCARD INFORMATION. IT IS ASSUMED 
THE USER HAS VERIFIED THE JOBCARD INFORMATION BEFORE CJC IS CALLED. 
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CIF = COMMON JOBNAME FIND ROUTINE CIF 


PURPOSE: 


CJF IS USED TO SEARCH JOBCARD IMAGES TO FIND THE JOBNAME AND TO 
UPDATE THE TSVJCHAR FIELD APPROPRIATELY. CJF IS CALLED AFTER DISPLAY 


OF THE JOBCARDS. 


CJF IS USED IN CONJUNCTION WITH CJN AND CJC IN 


PROCESSING USER JOBCARDS. 


INVOKED WITH: 
CALL TO CJF 


CALLING SEQUENCE PARAMETERS: 

<TLD> INPUT LOGICAL DISPLAY TABLE 
CHAR(1) IN/OUT CURRENT JOBNAME CHARACTER 
CHARC1) IN/OUT NEXT JOBNAME CHARACTER 
C4)CHARC72) INPUT ARRAY OF 4 JOBCARDS 
CHARC8) OUTPUT JOBNAME 


1. TLD 

2. CURCHAR 

3. NEXTCHAR 

4. JOBCARDS 

5. JOBNAME 

WHERE 
CURCHAR 
NEXTCHAR 
JOBNAME 


RETURN CODES: 
0 - ALWAYS. 


NOTES: 


THE OUTPUT FIELD FROM CJN. IT IS UPDATED BY CJF 
REFLECT POSSIBLE USER MODIFICATION OF THE JOBNAME 
JOBCARDS WERE DISPLAYED. 


THE OUTPUT FIELD FROM CJN. IT IS UPDATED BY CJF 
REFLECT POSSIBLE USER MODIFICATION OF THE JOBNAME 
JOBCARDS WERE DISPLAYED. 


SET TO THE JOBNAME IF ANY IS FOUND, OTHERWISE, 
IS SET TO BLANKS. 


SEE THE NOTES FOR OBJECT MODULE CJN. 


LICENSED MATERIAL - PROPERTY OF IBM 


PROGRAM ORGANIZATION 155 


CJN - COMMON JOSBNAME INIT ROUTINE | | CJN 


PURPOSE: eis J 


CJN IS USED TO INITIALIZE THE JOBNAME ON A SET OF JOBCARDS BEFORE. 
DISPLAYING THEM. CJN ALSO UPDATES THE TSVJCHAR FIELD IF AN SPF _. 
FORMAT JOBNAME IS BEING USED. SPF JOBNAMES CONSIST OF THE TSO USERID 
FOLLOWED BY A SINGLE CHARACTER FROM "A" TO "2" OR "0" TO "9". CJN IS 
USED IN CONJUCTION WITH CJF AND CJC IN HANDLING USER JOBCARDS. 


INVOKED WITH: 


CALL TO CJN 
CALLING SEQUENCE PARAMETERS: vr 

1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 

2. CURCHAR CHAR(1) OUT CURRENT JOBNAME CHARACTER | 

3. NEXTCHAR CHAR(1) OUT NEXT JOBNAME CHARACTER’ 

4. JOBCARDS (4)CHAR(72) IN/OUT ARRAY OF 4 JOBCARDS 

WHERE . 

CURCHAR - IS THE JOBNAME CHARACTER TAKEN FROM TSVJCHAR AND 


USED TQ INITIALIZE THE JOBCARDS. 


NEXTCHAR - IS SET TO THE VALUE OF TSVJCHAR AFTER IT IS 
INCREMENTED BY CJN. 


JOBCARDS - IS THE JOBCARD ARRAY INTO WHICH; THE JOBNAME WILL BE \ 
PLACED BY CJN. » 
RETURN CODES: 
0 - ALWAYS. 


NOTES: 


IF THE CALLING PROGRAM DOES NOT SUBMIT A JOB AFTER CALLING CJN, 

IT MUST COMPARE NEXTCHAR WITH TSVJCHAR AND IF EQUAL IT MUST SET 

TSVJCHAR TO CURCHAR. THIS PROCEDURE INSURES THAT THE JOBNAME IS 
INCREMENTED ONLY WHEN SPF FORMAT JOBNAMES ARE SUBMITTED. 
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CKVGET - COMMON KEYNORD-VALUE GET ROUTINE CKVGET 


PURPOSE: 
CKVGET IS USED TO RETRIEVE THE “REMEMBERED” VALUECS) OF A LIST OF 
NAMED KEYWORDS FROM THE KEYWORD/VALUE TABLE (TKV). CKVPUT IS USED 
TO STORE KEYWORD/VALUES INTO THE TKV. 

INVOKED WITH: 


CALL TO CKVGET 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 

2. KVBLOCK <KVBLOCK> INPUT KEYNORD/VALUE CONTROL BLOCK 
3. AREA CHAR(%) OUTPUT VALUE AREA 

WHERE 


KVBLOCK - CONSISTS OF ONE OR MORE KEYWORD/VALUE ENTRIES 
DELIMITED BY A BYTE SET TO *O00°X. SEE DATA AREAS 
SECTION FOR A DESCRIPTION OF THE KEYWORD/VALUE BLOCK. 


AREA - AN AREA EQUAL IN LENGTH TO THE SUM OF THE VALUE 
LENGTH FIELD(S) IN THE KVBLOCK. 
RETURN CODES: 
0 - ALL KEYWORDS WERE FOUND IN TKV. 
4 - ONE OR MORE KEYWORDS WERE NOT FOUND IN TKV. 


NOTES: 


EACH VALUE RETRIEVED IS PLACED IN THE NEXT N BYTES OF AREA. N IS 
THE VALUE LENGTH FROM A GIVEN KVBLOCK ENTRY. IF A GIVEN KEYWORD IS 
NOT FOUND IN THE TKV, ITS AREA SPACE IS SET TO BLANKS. IF THE 
LENGTH OF THE SPACE IS GREATER THAN THE VALUE RETRIEVED, THE SPACE 
IS PADDED WITH BLANKS. 


IF THE FIRST CHARACTER OF A KEYNORD NAME IS '®* CASTERISK) THEN 
THE KEYWORD/VALUE ENTRY IS ASSUMED NOT TO BE IN THE TKV. THE 
SEARCH OF THE TKV IS SKIPPED, THE OUTPUT AREA IS SET TO BLANKS AND 
THE RETURN CODE IS SET TO 4. 
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CKVPUT - COMMON KEYNORD-VALUE PUT ROUTINE CKUPUT 


PURPOSE: ? 
CKVPUT IS USED TO STORE KEYWORDS AND THEIR “REMEMBERED” VALUES INTO 
THE KEYWORD/VALUE TABLE (TKV). CKVGET IS USED TO RETRIEVE VALUES 
FROM THE TABLE. 

INVOKED WITH: 


CALL TO CKVPUT 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 

2. KVBLOCK <KVBLOCK> INPUT KEYWORD/VALUE CONTROL BLOCK 
3. AREA CHAR(%) INPUT VALUE AREA 

WHERE 


KVBLOCK - CONSISTS OF ONE OR MORE KEYWORD/VALUE ENTRIES 
DELIMITED BY A BYTE SET TO '00°X. SEE DATA AREAS 
SECTION FOR A DESCRIPTION OF THE KEYWORD/VALUE BLOCK, 


AREA - AN AREA EQUAL IN LENGTH TO THE SUM OF THE VALUE 
LENGTH FIELD(S) IN THE KVBLOCK. AREA CONTAINS THE 
VALUES TO BE STORED INTO THE TKV. 


RETURN CODES: 


0 - ALWAYS. J 


NOTES: 


EACH KEYWORD/VALUE PAIR REPLACES AN EXISTING TKV ENTRY OF THE SAME 
KEYWORD NAME, OR IS ADDED TO THE TKV IF NOT CURRENTLY STORED THERE. 


EACH VALUE IS BACKSCANNED FOR THE LAST NON-BLANK CHARACTER BEFORE 
STORING, AND ONLY THE NON-BLANK CHARACTERS ARE STORED, UNLESS THE 
KEYWORD IS FOUND IN THE “FIXED” PART OF THE TKV. BLANK VALUES ARE 
NOT STORED IN THE "VARIABLE™ PART OF THE TKV. 


THESE TECHNIQUES REDUCE THE TKV LENGTH AS WELL AS THE SPFPARMS DATA 
SET BLKSIZE REQUIRED. IF THERE IS INSUFFICIENT SPACE TO STORE A 
KEYWORD/VALUE IN THE TKV, THE USER IS NOTIFIED AND THE TKVFULL FLAG 
IN THE TKV HEADER IS SET. 


IF THE FIRST CHARACTER OF A KEYWORD IS 'X* CASTERISK) THEN THE 
KEYWORD/VALUE ENTRY IS NOT STORED IN THE TKV. 
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CLM - COMMON LOAD MODULE LOADER ROUTINE 


PURPOSE: 


CLM IS A SUBROUTINE USED TO LOAD COMMON SUBROUTINE MODULES. 

THESE MODULES CONTAIN SUBROUTINES AND THEIR ASSOCIATED ADDRESSES. 
THE ADDRESSES FROM THE PSEUDO TSC CAT THE ENTRY POINT OF TRE MODULE) 
ARE STORED IN THE CORRESPONDING ENTRIES IN THE REAL TSC FOR THE 


CURRENT PROCESSOR TASK. 


INVOKED WITH: 
CALL TO CLM 


CALLING SEQUENCE PARAMETERS: 


l. TLD <TLD> INPUT 
2. NAME CHAR (8) INPUT 
WHERE 

NAME 


RETURN CODES: 
0 - NORMAL COMPLETION. 


LOGICAL DISPLAY TABLE 
LOAD MODULE NAME 


~ THE NAME OF THE MODULE TO BE LOADED. 


4 - ERROR IN THE LOADED MODULE. AN ENTRY FROM THE LOADED MODULE 
CANNOT BE STORED IN THE REAL TSC BECAUSE THERE IS NO 


CORRESPONDING ENTRY. 


NOTES: 


CLM IS USED BY PMD TO LOAD A MODULE THAT IS IDENTIFIED WITH INPUT 


FROM APRIOPT. 


TAKE EFFECT DURING THE LIFE OF A PROCESSOR. 


THIS ALLOWS EXIT ROUTINES OR ALTERNATE ROUTINES TO 


THE MODULE IS DELETED 


BEFORE THE NEXT PRIMARY OPTION IS INVOKED BY PMD. 
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CLM 
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CLOG 


- COMNON LOG ROUTINE CLOG 


PURPOSE: 


CLOG 
ADDS 
PAGE 
INVOKED 


CALL 


CALLING 
lL. 
2. 
3. 


WHER 


RETURN 
0 - 


NOTES: 
THE 


SPF 
PERM 
occu 


TO F 
SPF 
CHAR 


IF T 
0.2) 
THE 
THE 
THE 
TERM 
STAR 
"SLO 


IS USED TO WRITE AN ENTRY TO THE SPF LOG DATA SET. CLOG 
A TIME STAMP TO THE MESSAGE BEFORE WRITING IT. IT ALSO WRITES 


HEADINGS. 

WITH: 

TO CLOG 

SEQUENCE PARAMETERS: 

TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
MSGID CHARC4) INPUT MESSAGE ID 

PARM1 % INPUT LOG MESSAGE PARAMETER 1 
PARMN % INPUT LOG MESSAGE PARAMETER ‘N' 
E 
MSGID - IDENTIFIES THE MESSAGE FROM THE SPF MESSAGE DATA 


SET THAT IS TO BE USED IN CREATING THE LOG RECORD. 


PARMCS) - PARM1 THROUGH PARMN ARE OPTIONAL PARAMETERS. THEY 
CAN BE IN ANY FORMAT THAT CAN BE HANDLED BY CMSG AND 
ARE USED AS SUBSTITUTIONAL PARAMETERS IN FORMATTING 
THE LOG MESSAGE. A MAXIMUM OF 10 OPTIONAL PARAMETERS 
IS SUPPORTED BY CLOG. 


CODE: 
ALWAYS. 


CLOG PARAMETER LIST MUST BE TERMINATED BY A VLIST FLAG. 


PROGRAMS SHOULD USE CLOG TO WRITE LOG MESSAGES ANY TIME A 
ANENT CHANGE IS MADE TO A DATA SET, OR A SIGNIFICANT EVENT 
RS SUCH AS SPF INITIALIZATION/TERMINATION. 


ORM THE LOG RECORD, THE LEVEL 1 AND LEVEL 2 MESSAGES FROM THE 
MESSAGE DATA SET ARE COMBINED TO PRODUCE A LOG RECORD OF 96 
ACTERS. 


HE LOG DATA SET PRIMARY ALLOCATION CAS SPECIFIED USING OPTION 
IS NOT ZERO, CLOG WILL CALL CTA TO ALLOCATE THE LOG DATA SET 
FIRST TIME THAT A LOGGING REQUEST IS MADE. THEN IT WILL LOG 
START OF SESSION MESSAGE (P001) BEFORE LOGGING THE REQUEST. 
ONE EXCEPTION IS WHEN THE FIRST REQUEST IS FOR THE SESSION 
INATION MESSAGE (P0602). IN THIS CASE, THE LOG IS ALLOCATED AND 
T AND END OF SESSION MESSAGES ARE LOGGED ONLY IF TSV FIELD 
GFLAG” IS "A™ CALWAYS). 
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CMB - COMMON MENU BUILD ROUTINE CMB 


PURPOSE: 
CMB IS USED TO BUILD A PARAMETER LIST WHICH CAN BE USED TO CALL MHA. 
ALL PARAMETER ENTRIES IN THE LIST WILL BE INITIALIZED TO POINT TO 
THE PROPER KEYWORD VALUES CALSO OBTAINED BY CMB). 

INVOKED WITH: 


CALL TO CMB 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. MHAPM % IN/OUT MHA PARAMETER LIST 
3. KVBPM % OUTPUT KVBLOCK AREA 
4. KVGPM x OUTPUT KEYWORD VALUE AREA 
WHERE 
MHAPM =- IS AN AREA FORMATTED EXACTLY THE SAME AS THE INPUT 


PARAMETER LIST TO MHA. THE CALLER MUST INITIALIZE 

THE TLD POINTER FIELD, THE MENU ID FIELD, AND THE 
PARM1, ..., PARMN FIELDS. THE PARMI1, ..., PARMN FIELDS 
SHOULD BE EACH INITIALIZED TO ZERO WITH THE HIGH 

ORDER BIT ON IN THE LAST CNTH) FIELD. IT WILL BE 
RETURNED BY CMB WITH THE PARM FIELDS SET TO THE 
ADDRESSES OF THE CORRESPONDING KEYWORD VALUES, 

CIN THE KVGPM AREA). 


KVBPM - IS AN AREA WHERE A KVBLOCK IS BUILT. IT IS FORMATTED 
BY CMB BASED ON DATA RETURNED BY A NON-DISPLAY CALL 
TO MHA FOR THE REQUESTED MENU ID. IT IS THE CALLER'S 
RESPONSIBILITY TO SUPPLY A LARGE ENOUGH AREA. 

KVGPM - IS AN AREA INTO WHICH THE KEYWORD VALUES, ASSOCIATED 
WITH THE REQUESTED MENU, ARE READ. IT IS THE CALLER'S 
RESPONSIBILITY TO SUPPLY A LARGE ENOUGH AREA. 

RETURN CODE: 


0 OR 4 - RETURN CODE IS PASSED BACK FROM CALL TO CKVGET. 


NOTES: 
THIS ROUTINE IS CALLED BY UOL AND USC. 
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CHUL 


- COMMON MEMBER LIST ROUTINE 


PURPOSE: 


CML IS USED TO PROCESS MEMBER LISTS. 


1. 
2. 
3. 
4. 


INVOKED 
CALL 


CALLING 
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CML 


SEVERAL SERVICES ARE. PROVIDED: 


READ PDS DIRECTORY AND BUILD IN-MEMORY MEMBER NAME LIST. 
FREEMAIN PREVIOUSLY CONSTRUCTED IN-MEMORY MEMBER LIST. 

ADD AN ENTRY TO A PREVIOUSLY CONSTRUCTED IN-MEMORY MEMBER LIST. 
DISPLAY A MEMBER LIST AND PROCESS SCROLLING AND USER SELECTIONS. 


SPF STATISTICS ARE DISPLAYED IF PRESENT. 


CML INTERFACES WITH A 


SELECTION ROUTINE SUPPLIED BY THE CALLING PROGRAM OR A BUILT-IN 


SELECTION ROUTINE. 


SELECTION ROUTINE INTERFACES ARE DESCRIBED 


IN FOLLOWING PAGES OF THIS SECTION. 


WITH: 
TO CML 


SEQUENCE PARAMETERS: 


TLD 
TFD 
CODE 
SUBR 
NAME 
PARM 


<TLD> 
<TFD> 
BITC32) 
PTRC31) 
CHAR(8) 
% 


CHARC4) 


INPUT LOGICAL DISPLAY TABLE 

IN/OUT | FILE DEFINITION TABLE 

INPUT CONTROL BIT CODES 

INPUT SELECT SUBROUTINE 

IN/OUT § MEMBER NAME ~ 
INPUT PARM FOR SELECT SUBROUTINE 

OUTPUT ERROR MESSAGE ID 


THE DATA SET MUST BE A PDS WITH AN OPEN DCB WITH 
DSORG=P0. TFDDDNAM MUST BE SET UP. 


32 BIT SWITCHES, 


AS FOLLOWS: 


ECODEC1) TO ECODEC24) - RESERVED 


ECODEC25) 0 - NOT AN ADD ENTRY REQUEST 
1 - ADD AN ENTRY TO MEMBER LIST 
ECODEC26) 0 - NO TTR IN MEMBER LIST 
1 - PLACE TTR IN MEMBER LIST 
ECODEC27) O - ALLOW SELECTION OF MEMBERS NOT IN LIST 
1 - ALLOW SELECTION OF MEMBERS IN LIST ONLY 
ECODEC28) 0 - DISPLAY MEMBER LIST 
1 - SUPPRESS DISPLAY 
ECODEC29) 0 - NO RENAME FIELD 
1 - RENAME FIELD 
ECODEC30)2 0 - SINGLE INPUT DATA SET 
1 - CONCATENATED INPUT DATA SETS 


CCONTINUED ON NEXT PAGE) 
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CML 


RET 


NOT 


- COMMON MEMBER LIST ROUTINE (CONTINUED ) CHL 


RETAIN MEMBER LIST FOR FUTURE CALLS 
FREE MEMBER LIST ON EXIT 


DO NOT BUILD A MEMBER LIST 
READ DIRECTORY AND BUILD MEMBER LIST 


SUBR - ADDRESS OF A SELECT ROUTINE WHICH CML WILL INVOKE WHEN 
A SELECT CODE IS ENTERED. IF SUBR IS ZERO, CML WILL 
CALL THE BUILT-IN SELECT ROUTINE DESCRIBED BELOW. 


NAME - ON INPUT, NAME OF THE FIRST MEMBER TO BE DISPLAYED 
ON THE SCREEN. IF THE MEMBER REQUESTED DOES NOT 
EXIST, THE LIST IS DISPLAYED STARTING WITH THE MEMBER 
PRECEDING THE MEMBER REQUESTED IN COLLATING SEQUENCE. 


ON OUTPUT, NAME OF THE MEMBER SELECTED IF THE BUILT-IN 
SELECT ROUTINE IS USED. 


PARM ~ PARAMETER THAT IS PASSED TO THE SELECT ROUTINE WHEN 
ONE IS SPECIFIED. 


MSGID ~- CONTAINS AN ERROR MESSAGE ID IF RETURN CODE IS NOT 0. 


ECODEC31) 


Ho 
! 


ECODEC 32) 


a) 
! 


URN CODES: 
0 - NORMAL RETURN. 


4 - ERROR RETURN. ONE OF THE FOLLOWING OCCURRED. 
- NO MEMBERS IN DATA SET. 
- BLDL ERROR OCCURRED. 
- I7Z0 ERROR READING THE PDS DIRECTORY. 
- OPEN OF DCB FOR DIRECTORY READ FAILED. 


ES: 


ON EXIT FROM CML, TFDCML POINTS TO THE MEMBER LIST IN SUBPOOL 3 IF 
THE MEMBER LIST WAS RETAINED. 


IF CML IS PASSED A ZERO "SUBR" ADDRESS, IT CALLS A BUILT-IN 
SELECT SUBROUTINE CUSED BY BROWSE AND EDIT). THE BUILT-IN ROUTINE 
PERFORMS THE FOLLOWING FUNCTIONS: 


VALIDITY CHECKS THE SELECT CODE -- 'S* IS THE ONLY VALID CODE. 
CHANGES A VALID SELECT CODE TO BLANK. 

RETURNS THE MEMBER SELECTED IN THE NAME PARAMETER. 

IGNORES THE RENAME FIELD. 

SETS THE ENDFLAG ON. 


SEE THE NEXT PAGE FOR INFORMATION ON CML SELECT SUBROUTINES INVOKED 
WHEN THE SUBR PARAMETER IS NON-ZERO. 


CCONTINUED ON NEXT PAGE) 
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CML 


- COMMON MEMBER LIST ROUTINE (CONTINUED ) 


CML INVOKED SELECT SUBROUTINE: 


CML INVOKES A "SELECT SUBROUTINE” TO PROCESS EACH MEMBER SELECTED 
PARAMETER PASSED TO CML IS THE ADDRESS OF 


FROM THE LIST. 


THE "SUBR* 


THE SELECT SUBROUTINE. 
THE CALLING SEQUENCE PARAMETERS FOR THE SELECT SUBROUTINE ARE: — 


WOOtIAU LD GN & 


USED BY CML. 


NOTES: 


MEMBER 


RENAME 


FLAGS 


<TLD> 
<TFD> 
BITC32) 
CHAR(8) 
% 
CHAR(C1) 
CHAR(8) 
CHAR(8) 
BITC8&) 


32 BIT SWITCHES, 
- MEMBER NAME, 
PARAMETER THAT IS PASSED TO THE SELECT ROUTINE FROM 


INPUT 
IN/OUT 
INPUT 
IN/OUT 
IN/OUT 
IN/OUT 
INPUT 
IN/OUT 
OUTPUT 


LOGICAL DISPLAY TABLE 

FILE DEFINITION TABLE 

CONTROL BIT CODES 

MEMBER NAME TO CML 

PARAMETER FOR SELECT SUBROUTINE 
SELECT CCDE 

SELECTED MEMBER NAME 

RENAME FIELD 

FLAGS 


AS PASSED TO CML. 


AS PASSED TO CML. 


THE PROGRAM THAT CALLED CML. 


USER. 


IS THE SELECTION CODE THAT WAS ENTERED BY THE TERMINAL 
THIS CODE SHOULD BE SET TO BLANK OR 


"%" BEFORE 


EXITING UNLESS ENDFLAG IS SET. 


TERMINAL USER. 


THE MEMBER. 


1 FLAGS, 


2 ENDFLAG BIT(1), 
2 PAGEFLAG BIT(1), 
BIT(6), 


2 


IS THE NAME OF THE MEMBER THAT WAS SELECTED BY THE 


IS THE CONTENTS OF THE RENAME FIELD ASSOCIATED WITH 


THE SELECT ROUTINE CAN CHANGE THIS FIELD. 


IS A BYTE CONTAINING TWO FLAGS IN THE FOLLOWING FORMAT. 


ENDFLAG - INDICATES ACTION TO BE TAKEN BY CML UPON 


RETURN FROM SELECT SUBROUTINE, 


AS FOLLOWS: 


0 - RESCAN SCREEN IMAGE FOR SELECT CODES. 
1 ~ RETURN TO CALLING PROGRAM. 


PAGEFLAG - SET BY CML AS FOLLOWS: 

0 - IF THE CURRENT SELECTION IS NOT THE 
LAST SELECTION ON THE PAGE. 

1 ~ IF THE CURRENT SELECTION IS THE LAST 


ON THE PAGE. 


THE SELECT ROUTINE SHOULD 


CLOSE AND RELEASE THE DATA SET BEING 
PROCESSED IN THIS CASE. 


THE RETURN CODE CIN REG 15) FROM THE SELECT SUBROUTINE IS NOT 


THE NAMES OF THE OBJECT MODULES WHICH ARE CML SELECT SUBROUTINES 
ARE AS FOLLOWS: 


- USED BY UDM (MEMBER LIST OPTION OF LIBRARY UTILITY) 
- USED BY UMC (MOVE/COPY UTILITY) 
- USED BY URS CRESET STATISTICS UTILITY) 


UDMS 
UMCS 
URSS 
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CNSG - COMMON MESSAGE ROUTINE CMSG 


PURPOSE: 


CMSG IS USED TO FORMAT ERROR MESSAGES. CMSG OPTIONALLY READS A 
MESSAGE FROM THE SPFMSGS DATA SET, FORMATS THE MESSAGE AND RETURNS 
THE Meee TO THE CALLER. PARAMETERS MAY BE SUBSTITUTED INTO THE 
MESSAGE. 


INVOKED WITH: 
CALL TO CMSG 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. MSGID CHARC4) INPUT MESSAGE ID 
3 LEVEL FIXEDC31) INPUT MESSAGE LEVEL 
4. AREA CHARCX) OUTPUT AREA FOR MESSAGE 
5. SIZE FIXEDC31) INPUT SIZE OF AREA (BYTES) 
6. PARMI x SUBSTITUTION PARAMETER 1 
PARMN x SUBSTITUTION PARAMETER N 
WHERE 
MSGID - IS THE MESSAGE ID. THE FIRST CHARACTER MUST BE AN 


UPPER CASE ALPHA CHARACTER. THE REMAINING CHARACTERS 
MUST BE NUMERIC. 


LEVEL - 0 - TO REQUEST THE HELP (TUTOR) NAME C(CHARS(8)) 
BE RETURNED TO TLDHELP. 

- TO REQUEST THE LEVEL 1 (SHORT) MESSAGE 

~ TO REQUEST THE LEVEL 2 (LONG) MESSAGE 

- TO REQUEST SHORT AND LONG MESSAGES, AND FOR 
TLDHELP AND TLDALARM TO BE SET FROM THE MESSAGE. 


AREA - IS THE AREA WHERE THE MESSAGECS) IS TO RETURNED. 
IF LEVEL 3 IS REQUESTED, THE SHORT MESSAGE (24 BYTES) 
IS FOLLOWED BY THE LONG MESSAGE CLENGTH SPECIFIED BY 
THE SIZE PARAMETER, I.E. AREA MUST BE 24 PLUS SIZE). 


SIZE - IS THE NUMBER OF AREA BYTES PROVIDED. IF THE MESSAGE 
EXCEEDS THE SIZE, IT WILL BE TRUNCATED. NORMALLY, THE 
VALUE OF THIS PARAMETER IS: 


GN = 


LEVEL SIZE 
0 NOT USED 
1 24 
2 72 
3 72 


PARMCS) - PARM1 THROUGH PARMN ARE OPTIONAL PARAMETERS FOR 
SUBSTITUTION INTO THE CORRESPONDING PARAMETER FIELDS 
OF THE MESSAGE (SEE THE INSTALLATION AND CUSTOMIZATION 
GUIDE FOR A DESCRIPTION OF SPF MESSAGE FORMATS). A 
MAXIMUM OF 50 PARAMETERS IS SUPPORTED. 


CCONTINUED ON NEXT PAGE) 
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CMSG - COMMON MESSAGE ROUTINE (CONTINUED) CMSG 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
THE INPUT PARAMETER LIST TO CMSG MUST TERMINATE WITH A VLIST FLAG. 


CMSG NORMALLY ACCESSES THE SPF MESSAGES DATA SET (SEE THE 
INSTALLATION AND CUSTOMIZATION GUIDE FOR A DESCRIPTION OF SPF 
MESSAGE FORMATS). THE REQUESTED MESSAGE IS PLACED IN THE SPECIFIED 
ANSWER AREA. If THE AREA IS TOO LONG, IT IS PADDED WITH TRAILING 
BLANKS. IF TOO SHORT, THE MESSAGE IS TRUNCATED. 


IF THE FIRST CHARACTER OF THE MESSAGE ID IS BLANK OR BINARY ZERO, 
THE MESSAGE IS CONTAINED IN THIS CALLING SEQUENCE, AND THE MESSAGE 
DATA SET IS NOT ACCESSED. IN THIS CASE, PARM1 IS THE ENTIRE 

LEVEL 1 MESSAGE (24 CHARACTERS), AND PARM2 IS THE ENTIRE LEVEL 2 
MESSAGE (72 CHARACTERS). THE REMAINING PARMS, IF ANY, CORRESPOND 
TO THE SUBSTITUTABLE PARAMETERS IN THE MESSAGE. THIS SPECIAL CASE 
ALLOWS PREVIOUSLY RETRIEVED COR INTERNALLY GENERATED) MESSAGES TO 
BE NET ERS BY CMSG FOR THE PURPOSE OF FILLING IN SUBSTITUTABLE 
PAR . 
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CPRINT = COMMON PRINT ROUTINE CPRINT 


PURPOSE: 
CPRINT WRITES A MEMBER OF A PDS OR A SEQUENTIAL DATA SET TO THE SPF 
LIST DATA SET. HEADERS AND QTHER INFORMATION ARE PRINTED BASED ON A 
FORMAT CODE. THE DATA SET GR MEMBER TO BE PRINTED IS NOT MODIFIED. 
INVOKED WITH: 


CALL TO CPRINT 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TFD <TFD> INPUT FILE DEFINITION TABLE 
3. PROJECT CHAR(8) INPUT PROJECT NAME 

4. LIBRARY CHAR(8) INPUT LIBRARY NAME 

5. TYPE CHAR(8) INPUT TYPE QUALIFIER 

6. MEMBER CHAR(8) INPUT MEMBER NAME 

7. FORMAT CHAR(1) INPUT OUTPUT FORMAT TYPE CODE 
WHERE 


FORMAT <- ONE OF THE FOLLOWING OUTPUT FORMAT TYPE CODES: 


"S' - SPF LIBRARY PDS HEADER, START COLS, MOD FLAGS, 
AND DATA LEN CIF VARIABLE LRECL). PARAMETERS 
3, 4, AND 5 ARE USED ONLY FOR THIS FORMAT. 

"N' - NONSPF LIBRARY PDS OR SEQUENTIAL HEADER, 
START COLS, AND DATA LEN CIF VARIABLE LRECL). 
THE DATASET NAME IN THE TFD IS USED. 

"X" - NO HEADERS OR ADDITIONAL INFORMATION. 


RETURN CODE: 


0 - THE DATA HAS BEEN SUCESSFULLY WRITTEN. 


4 - THE DATA WAS NOT WRITTEN OR WAS PARTIALLY WRITTEN DUE TO AN 
ALLOCATION, OPEN, OR I70 ERROR. 


8 - THE DATA WAS NOT WRITTEN DUE TO DATA SET CHARACTERISTICS. A 
MESSAGE WAS WRITTEN TO THE SPF LISTING DATA SET. 


12 - THE DATA WAS NOT WRITTEN BECAUSE THE MEMBER SPECIFIED WAS NOT 
FOUND OR THERE WAS A FIND OR BLDL ERROR. A MESSAGE WAS WRITTEN 
TO THE SPF LISTING DATA SET. 


16 - THE DATA WAS PARTIALLY WRITTEN DUE TO AN I/0 ORROR READING THE 
DATA. A MESSAGE WAS WRITTEN TO THE SPF LISTING DATA SET. 


20 - THE MEMBER OR DATA SET IS EMPTY. A MESSAGE WAS WRITTEN TO THE 
SPF LISTING DATA SET. 


NOTES: 
THE DCB MUST BE OPENED FOR INPUT BEFORE CALLING CPRINT. 
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CRELS - COMNGN RELEASE ROUTINE CRELS 


PURPOSE: 
CRELS IS USED TO RELEASE A SHARED DASD PACK AFTER UPDATING A DATA 
SET, AND TO DE@ THE RESOURCE. CRELS IS USED IN CONJUNCTION WITH THE 
COMMON RESERVE SUBROUTINE (CRESV). 

INVOKED WITH: 


CALL TO CRELS 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TFD <TFD> INPUT FILE DESCRIPTION TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
THE TFD BLOCK MUST BE THE SAME AS THAT USED FOR CRESV. 


IF THE TFDLENQ FLAG IS SET BY THE CALLER, AN ADDITIONAL DEQ IS ISSUED 
OF THE FORM USED BY THE LINK EDITOR. 


CRELS CLEARS THE TFDRESV FLAG. 
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_ CRESU 


= COHMON RESERVE ROUTINE CRESV 


PURPOSE: 


CRESV IS USED TO RESERVE A SHARED DASD VOLUME PRIOR TO UPDATING A 
DATA SET. CRESV SHOULD BE CALLED BEFORE WRITING, DELETING, OR 
RENAMING ANY USER DATA SET OR MEMBER, EXCEPT FOR TEMPORARY DATA SETS 
WHICH ARE ALLOCATED BY SPF ON BEHALF OF THE USER CSUCH AS SPFX.LIST, 


SPFLOG®.LIST, SPFTEMP®.LIST, AND SPFTEMPX.CNTL). 


INVOKED WITH: 
CALL TO CRESV 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> 
2. TFD <TFD> 


INPUT 
INPUT 


RETURN CODE: 
0 - NORMAL RETURN. 


4 - DDNAME IN TFD WAS NOT FOUND IN THE TIOT. 


NOTES: 


THE RESERVE MACRO ISSUED BY CRESV INCLUDES AN "ENQ™ FUNCTION. 


LOGICAL DISPLAY TABLE 
FILE DEFINITION TABLE 


ENQ PARAMETERS ARE DERIVED FROM THE TFD PARAMETER. 


IF THE DATA SET IS A POTENTIAL LOAD MODULE DATA SET, THE CALLER 
SHOULD SET THE TFDLEN@ SWITCH SO THAT CRESV WILL ISSUE A SECOND 


RESERVE OR EN@. 
EDITOR. 


TO DEQ THE RESOURCE FOLLOWING UPDATE, 


(CRELS) IS USED. 


REFER TO APPENDIX A FOR MORE INFORMATION ON THE ENQ/DEQ LOGIC. 
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PROGRAM ORGANIZATION 


RESERVE NOT ISSUED. 


THE 


THE COMMON RELEASE SUBROUTINE 


THE SECOND EN@ IS THE SAME AS THAT USED BY THE LINK 
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CSB - - COMMON SUBMIT ROUTINE 7 CSB. 


PURPOSE: 


CSB IS A COMMON SUBROUTINE USED FOR SUBMITTING BACKGROUND JOBS TO 
OS. THE JCL TO BE SUBMITTED IS PASSED TO CSB IN A TEMPORARY CONTROL 
CARD DATA SET. THE TEMPORARY DATA SET SHOULD CONTAIN A JOB STATEMENT 
AS THE FIRST RECORD(S), UNLESS THE SUBMIT COMMAND IS SET UP TO 
PROVIDE VALID JOBCARDS AT YOUR INSTALLATION. THE TEMPORARY DATA SET 
MUST BE CLOSED AT ENTRY TO CSB. 


INVOKED WITH: 
CALL TO CSB 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. DSNS CHAR (46) INPUT DATA SET NAME STRUCTURE 
WHERE 
DSNS - IS THE DATA SET NAME STRUCTURE (STANDARD DAIR FORMAT). 


E.G., DCL 1 DSNS, 
2 DSNL FIXED(15), 7% DSNAME LENGTH 7 
2 DSN CHAR(C449); 7*® DSNAME */ 
THE DATA SET NAME IS NORMALLY "USERID.SPFTEMP1.CNTL' 
OR *USERID.SPFTEMP2.CNTL*, AS SET UP BY CTA. 
RETURN CQDE: 
0 - NORMAL COMPLETION. 
4 - ATTENTION TERMINATION. 
8 - ABEND TERMINATION. 


OTHER - RETURN CODE FROM SUBMIT COMMAND. 
NOTES: 


CSB CALLS CAT TO ATTACH THE TSO SUBMIT COMMAND WHICH ACTUALLY SUBMITS 
THE JOB TO THE JOB QUEUE. 
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CSCROLL - 


PURPOSE: 


COMMON SCROLL ROUTINE 


CSCROLL 


CSCROLL IS USED TO INTERPRET THE SCROLL PFK‘*S AND THE SCROLL aoe 


FIELD, 

COLUMN 
INVOKED WI 

CALL TO 


CALLING SE 

1. TLD 

2. PAR 
WHERE 

PAR 


PARAMET 
CUR 


MAXLINE - CINPUT ONLY - NOT CHANGED BY CSCROLL). INDICATES 
THE MAXIMUM VALID LINE NUMBER TO BE VIEWED. NOTE: 
IF THE ACTUAL NUMBER OF LINES IN THE DATA SET IS 


PGL 


LICENSED M 


AND RETURN AN UPDATED BINARY VALUE FOR THE FIRST LINE 
BEING VIEWED. 


TH: 
CSCROLL 


QUENCE PARAMETERS: 


<TLD> INPUT LOGICAL DISPLAY TABLE 
M % IN/OUT PARAMETER STRUCTURE 
M - IS A STRUCTURE CONSISTING OF: 


CURLINE FIXEDC31) IN/OUT CURRENT RELATIVE LINE NUMBER 


MAXLINE FIXEDC31) 

PGLEN FIXED(31) 

CURCOL FIXED(31) IN/OUT CURRENT COLUMN NUMBER 

MAXCOL FIXEDC31) INPUT MAXIMUM COLUMN NUMBER 
1) 


INPUT MAXIMUM RELATIVE LINE NUMBER 
INPUT PAGE LENGTH CNUMBER OF LINES) 


PGWIDTH FIXEDC3 INPUT PAGE WIDTH CNUMBER OF COLUMNS) 
ER USAGE 
LINE - ON INPUT, INDICATES THE FIRST LINE BEING DISPLAYED 


( VALID RANGE: 1 <= CURLINE <= MAXLINE ). 
ON OUTPUT, CURLINE WILL BE SET AS FOLLOWS: 


FOR SCROLL DOWN: CURLINE = CURLINE + AMOUNT 
(BUT NOT EXCEEDING MAXLINE) 


FOR SCROLL UP: CURLINE = CURLINE - AMOUNT 
(BUT NOT LESS THAN ONE) 


WHERE “AMOUNT™ IS EITHER THE NUMERIC VALUE ENTERED 


BY THE USER OR: 


PGLEN IF ‘PAGE’ WAS SPECIFIED 
PGLEN/2 IF "HALF* WAS SPECIFIED 


IF SCROLL UP "MAX" IS REQUESTED, CURLINE IS SET T0 l. 
IF SCROLL DOWN "MAX" IS REQUESTED, CURLINE IS SET TO 


A NEGATIVE NUMBER = -PGLEN. 


UNKNOWN, MAXLINE SHOULD BE SET TO A VERY LARGE 
NUMBER, SUCH AS ‘7FFFFFFF’X. 


EN - CINPUT ONLY - NOT CHANGED BY CSCROLL). INDICATES 


THE CURRENT NUMBER OF LINES PER LOGICAL PAGE CFOR 


SCROLLING DOWN OR UP BY A PAGE). 


CCONTINUED ON NEXT PAGE) 
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CSCROLL - COMMON SCROLL ROUTINE (CONTINUED ) i . CSCROLL 


CURCOL - 


MAXCOL - 


PGWIDTH - 


RETURN CODES: 


ON INPUT, INDICATES THE 1ST COLUMN BEING DISPLAYED 
€ VALID RANGE: 1 <= CURCOL <= MAXCOL-PGWIDTH+1 ). 
ON OUTPUT, CURCOL WILL BE SET AS FOLLOWS: 


FOR SCROLL RIGHT: CURCOL = CURCOL + AMOUNT 

(NOT EXCEEDING MAXCOL-PGWIDTH+1)} 
FOR SCROLL LEFT: CURCOL = CURCOL - AMOUNT 

(BUT NOT LESS THAN ONE) 


WHERE "AMOUNT" IS EITHER THE NUMERIC VALUE ENTERED 
BY THE USER OR: 


PGWIDTH IF "PAGE* WAS SPECIFIED 
PGNWIDTH/2 IF "HALF* WAS SPECIFIED 


IF SCROLL RIGHT "MAX" IS REQUESTED, CURCOL IS SET TO 
MAXCOL - PGWIDTH + 1. 
IF SCROLL LEFT "MAX" IS REQUESTED, CURCOL IS SET TO l. 


THE MAXIMUM COLUMN TO BE VIEWED (SHOULD NOT BE LESS 
THAN PGWIDTH). 


THE CURRENT NUMBER OF COLUMNS PER LOGICAL PAGE CFOR 
SCROLLING RIGHT OR LEFT BY A PAGE). 


0 - NORMAL COMPLETION. 
1 - INVALID SCROLL AMOUNT. 
2 - NONE OF THE SCROLL PFK'S WAS PRESSED. THIS IS A 


PROGRAMMING ERROR -- CSCROLL SHOULD BE CALLED ONLY 
WHEN BIT TLDSCROL IS ON IN THE TLD. 


NOTES: 


IF RETURN CODE IS NON-ZERO, NEITHER CURLINE NOR CURCOL IS CHANGED. 
CSCROLL “CLEANS UP" THE VALUE IN THE SCROLL AMOUNT FIELD 


AS FOLLOWS: 
'p-—-1 
tH---F 
FF en 
'M-——? 


REPLACED WITH ‘PAGE’ 

REPLACED WITH ‘HALF* 

REPLACED WITH "CSR" 

REPLACED WITH PREVIOUS VALUE ('MAX' DOES 
NOT REMAIN IN EFFECT). 


FOR NUMERICS FOLLOWED BY ALPHABETICS (E.G., '"15XX") 
THE LOW ORDER ALPHABETIC CHARACTERS ARE BLANKED OUT. 


CSCROLL ALWAYS LEAVES THE CURSOR POSITIONED UNDER THE BEGINNING 
OF THE SCROLL AMOUNT FIELD. 
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CSM - COMMON STORAGE MANAGEMENT ROUTINE CSM 
PURPOSE: 
CSM PROVIDES AN INTERFACE WITH THE GETMAIN AND FREEMAIN SYSTEM 
SERVICES. 


INVOKED WITH: 
CALL TO CSM 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 

2 CODE FIXEDC31) INPUT GETMAIN/FREEMAIN CODE 

3. LENGTH FIXEDC31) OUTPUT LENGTH OF AREA 

4 ADDRESS PTRC31) IN/OUT ADDRESS OF PTR, OR 
FIXED(31) IN/OUT REGISTER NUMBER (1-12) 

5. SUBPOOL FIXEDC31) INPUT SUBPOOL TO BE USED 

WHERE 

CODE - SYMBOLICALLY - GETMAINC, GETMAINU OR FREEMAIN. 

NUMERIC CODE - C1) , (2) OR (3) 


LENGTH =- NUMBER OF BYTES TO GETMAIN OR FREEMAIN. USE ZERO IF 
SUBPOOL CPARM 5) IS TO BE FREEMAINED. 


ADDRESS - IF A NUMBER FROM 1-12 IS PRESENT, THE CORRESPONDING 

REGISTER IS USED TO PASS AN ADDRESS FROM OR TO CSM. 

- IF AN ADDRESS IS PRESENT IT POINTS TO A WORD TO BE 
USED TQ PASS AN ADDRESS FROM OR TO CSM. 

- IF A GETMAIN IS TO BE DONE, THE ADDRESS OF THE AREA 
WHICH IS GETMAINED IS PASSED AS OUTPUT FROM CSM BACK 
TO THE CALLER. 

- IF A FREEMAIN IS TO BE DONE, THE ADDRESS OF THE AREA TO 
BE FREEMAINED IS PASSED FROM THE CALLER TO CSM. 


RETURN CODE: 
0 - GETMAIN OR FREEMAIN SUCCESSFUL. 
4 - CONDITIONAL GETMAIN WAS UNSUCCESSFUL. 


8 - INVALID REQUEST CODE WAS ENTERED OR ERROR RETURNED FROM 
GETMAIN OR FREEMAIN. 


NOTES: 
CSM DOES NOT USE SPFPROC/SPFRETRN BECAUSE NO DYNAMIC AREA IS USED. 
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CTA - COMMON ALLOC-OPEN TEMP DATA SET ROUTINE 


PURPOSE: 


CTA PASSES CONTROL TO CT1 TO ALLOCATE AND OPEN THE FOLLOWING DATA 
SETS THAT MAY BE USED DURING AN SPF SESSION. 


USERID.SPFX.LIST 
USERID.SPFLOGX.LIST 
USERID.SPFIEMP1.CNTL 
USERID.SPFTEMP1.LIST 
USERID.SPFTEMP2.CNTL 
USERID.SPFTEMP2.LIST 
USERID.SPFEDIT1. BACKUP 
USERID.SPFEDIT2.BACKUP 


INVOKED WITH: 
CALL TO CTA 


CALLING SEQUENCE PARAMETERS: 


LIST DATA SET 

LOG DATA SET 

CONTROL CARD DATA SET (LOGICAL DISPLAY 1) 
LISTING DATA SET (LOGICAL DISPLAY 1) 
CONTROL CARD DATA SET CLOGICAL DISPLAY 2) 
LISTING DATA SET (LOGICAL DISPLAY 2) 
FIRST EDIT RECOVERY DATA SET 

SECOND EDIT RECOVERY DATA SET 


1. TLD <TLD> IN/OUT LOGICAL DISPLAY TABLE 
2. TYPE CHAR(8) INPUT TYPE OF DATA SET 
3. OPTION FIXEDC31) INPUT TYPE OF OPEN REQUIRED 
WHERE 
TYPE ~ 8 CHARACTERS CODED EXACTLY AS SHOWN BELOW CINCLUDING 


THE CHARACTER 


*X* AND TRAILING BLANKS). ANY OTHER 


TYPE CODE CAUSES CTA TO ABEND WITH USER CODE 970. 


"SPFLIST ' 
"SPFLOG ' 
*SPFCNTLX’ 
"SPFLISTX* 
"SPFEDITX* 


OPTION - THE OPEN TYPE 
0 - OUTPUT 
1 - INPUT 
RETURN CODE: 
0 - ALWAYS. 


- FOR THE LIST DATA SET. 

- FOR THE LOG DATA SET. 

- FOR A CONTROL CARD DATA SET. 

~- FOR A LISTING DATA SET. 

- FOR AN EDIT RECOVERY DATA SET. 


REQUIRED. 


(CONTINUED ON NEXT PAGE) 
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CTA 


CTA - COMNON ALLOC-OPEN TEMP DATA SET ROUTINE (CONTINUED ) CTA 


NOTES: 
THIS MODULE HAS REPLACED THE SPF VERSION 2.1 CALLOC SUBROUTINE. 


SPFLOG, SPFLIST, AND THE EDIT RECOVERY DATA SETS HAVE TFD'S COMPILED 
INTO THE TSI (TABLE TDS). TFD'S FOR THE SPFCNTLX AND SPFLISTX DATA 
SETS ARE CREATED BY CTA THE FIRST TIME THAT THE DATA SET IS USED. 
THE TFD FOR EACH TYPE OF DATA SET IS LOCATED AS FOLLOWS: 


*‘SPFLOG ° - TDSLOGP <-> TFD FOR LOG DATA SET. 

"SPFLIST * - TDSLISTP -> TFD FOR LIST DATA SET. 
*SPFCNTLX’ - TLDTFDCP -> TFD FOR CONTROL CARD DATA SET. 
"SPFLISTX' - TLDTFDLP -> TFD FOR LISTING DATA SET. 
*SPFEDITX' - TLDTFDEP -> TFD FOR EDIT RECOVERY DATA SET. 


ON RETURN FROM CTA, THE APPROPRIATE TFD, DATA SET NAME, AND DCB HAVE 
BEEN SET UP. IF CTA WAS SUCCESSFUL, THE DCB WILL BE OPENED. IF 
ALLOCATION OR OPEN FAILED, THE DCB WILL BE CLOSED. THE CALLING 
PROGRAM IS RESPONSIBLE FOR TESTING “"TFDOPN™ BEFORE ATTEMPTING TO USE 
THE DCB. 


THE ADDRESSES OF THE DATA SET NAME STRUCTURE C(CTFDDSNSP) AND DCB 
CTFDDCBP) ARE CONTAINED IN THE TFD. 


IF THE DATA SET HAS ALREADY BEEN ALLOCATED WHEN CTA IS CALLED, THE 
DCB WILL BE OPENED. IF THE DCB IS OPEN WHEN CTA IS CALLED, THE DCB 
WILL BE CLOSED AND REOPENED. 


IF ALLOCATION FAILS, CTA WILL TPUT LINE MESSAGES THAT INDICATE THE 
DATA SET NAME AND REASON FOR FAILURE. THE USER CAN THEN ATTEMPT TO 
CONTINUE WITHOUT THE DATA SET CFOR EXAMPLE WITHOUT THE LOG DATA SET), 
OR HE CAN CHOOSE TO EXIT FROM SPF. 


WHEN AN ATTEMPT CEITHER SUCCESSFUL OR UNSUCCESSFUL) HAS BEEN MADE TO 
ALLOCATE A DATA SET THE “TFDALLOC” FLAG BIT IS SET ON. CALLING 
PROGRAMS CAN CHECK THIS BIT BEFORE CALLING CTA TO AVOID REPEATED 
ATTEMPTS TO ALLOCATE A DATA SET THAT, FOR SOME REASON OR OTHER, 
CANNOT BE ALLOCATED, AND THUS AVOID REPEATED NOTIFICATIONS TO THE 
TERMINAL USER THAT THE DATA SET CANNOT BE ALLOCATED. 


A TYPICAL SEQUENCE FOR USING CTA FOR SPFLIST OR SPFLOG MIGHT BE: 


IF TFDALLOC = OFF THEN 
coe CTA CTLD,'SPFLIST "); CNOTE 8 CHARACTER NAME) 
ELS 


IF TFDOPN = ON THEN 
_WRITE OUTPUT TO LIST DATA SET: 
DISPLAY ERROR MESSAGE; 


A TYPICAL SEQUENCE FOR USING CTA FOR SPFLISTX, SPFCNTLX, OR 
SPFEDITX MIGHT BE: 


CALL CTA CTLD,*SPFCNTLX'); 

IF TFDOPN = ON THEN 

glee = OUTPUT TO TEMPCNTL DATA SET; 
DISPLAY ERROR MESSAGE; 
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CTF - COMMON CLOSE-FREE TEMP DATA SET ROUTINE CTF 


PURPOSE: 


CTF PASSES CONTROL TO CT2 TO CLOSE AND FREE THE DATA SETS THAT 
WERE ALLOCATED AND OPENED BY CTA. 


INVOKED WITH: 
CALL TO CTF 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> IN/OUT LOGICAL DISPLAY TABLE 
2. TYPE CHAR(8) INPUT TYPE OF DATA SET 
3. OPTION CHAR(1) INPUT FREE OPTION 
WHERE 
TYPE - 8 CHARACTERS CODED EXACTLY AS SHOWN BELOW CINCLUDING 


THE CHARACTER 


> 4 


AND TRAILING BLANKS). ANY OTHER 


TYPE CODE CAUSES CTF TO ABEND WITH USER CODE 971. 


"SPFLIST ' 
"SPFLOG ' 
"SPFCNTLX' 
"SPFLISTX’ 
"SPFEDITX' 


FOR 
FOR 
FOR 
FOR 
FOR 


OPTION - SINGLE CHARACTER AS 


TREATED LIKE 


uh Saar 


THE LIST DATA SET. 

THE LOG DATA SET. 

A CONTROL CARD DATA SET. 
A LISTING DATA SET 

AN EDIT RECOVERY DATA SET. 


SHOWN BELOW. ANY OTHER CODE I[S 


"D’' ~- IF THE DATA SET IS TO BE DELETED. 
"K' ~- IF THE DATA SET IS TO BE KEPT. 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


THIS MODULE HAS REPLACED THE SPF VERSION 2.1 CFREE SUBROUTINE. 
ON RETURN FROM CTF, THE APPROPRIATE DCB WILL HAVE BEEN CLOSED, 


AND THE ALLOCATION FREED. 


FOR FURTHER INFORMATION ON THE DATA SETS HANDLED BY CTA/CTF 


SEE THE DESCRIPTION OF CTA. 


FOR FURTHER INFORMATION ON THE CTF/CT2 INTERFACE, SEE THE 


DESCRIPTIONS OF CTl AND CT2. 
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CTGET = COMMON TGET (TERMINAL GET) ROUTINE CTGET 


PURPOSE: 
CIGET IS USED 10 ISSUE A TGET SVC. 


INVOKED WITH: 
CALL TO CTGET 


CALLING SEQUENCE PARAMETERS: 


l. TLD <TLD> INPUT LOGICAL DISPALY TABLE 
2. AREA CHAR(%) OUTPUT INPUT/OUTPUT AREA 
3. AREASIZE FIXED(31) INPUT INPUT AREA SIZE 
4. OPTIONS BIT(32) INPUT TGET OPTIONS 
5. INSIZE FIXED(31) OUTPUT INPUT DATA SIZE 
WHERE 
AREA - THE AREA WHERE SCREEN DATA WILL BE RECEIVED FROM 


THE TERMINAL ACCESS METHOD. 
AREASIZE - THE MAXIMUM SCREEN DATA SIZE ACCEPTABLE. 


OPTIONS - CODES REPRESENTING THE VARIOUS TGET MACRO OPTIONS. 
THE ONLY CODE USED BY SPF IS '129"° = ‘ASIS,WAIT' 


INSIZE - THE ACTUAL SIZE OF SCREEN DATA PLACED IN AREA. 


RETURN CODE: 
RETURN CODE FROM TGET SVC. 


NOTES: 
NONE. 
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CTPUT - COMMON TPUT (TERMINAL PUT) ROUTINE CTPUT 


PURPOSE: 
CTPUT IS USED TO ISSUE A TPUT SVC. 


INVOKED WITH: 
CALL TO CTPUT 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. AREA CHARC#) OUTPUT OUTPUT DATA AREA 
3. AREASIZE FIXEDC31) INPUT OUTPUT DATA SIZE 
4. OPTIONS BITC32) INPUT TPUT OPTIONS 
WHERE 
AREA - THE OUTPUT DATA FOR THE TERMINAL ACCESS METHOD 


TO SEND TO THE SCREEN. 
AREASIZE - THE SIZE OF THE OUTPUT DATA. 


OPTIONS - CODES REPRESENTING THE VARIOUS TPUT MACRO OPTIONS. 
THE FOLLOWING ARE USED BY SPF: 


0 - ‘NO OPTIONS’ 
3 =- 'FULLSCR’ 
8 - ‘HOLD’ 
ll - 'FULLSCR,HOLD’ 
RETURN CODE: 


RETURN CODE FROM TPUT SVC. 


NOTES: 
NONE. 
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cTl - COMMON ALLOC-OPEN TEMP DATA SET SUB 


PURPOSE: 
CT1 IS USED TO ALLOCATE AND OPEN TEMPORARY SPF DATA SETS. IT 
HANDLES ALLOCATION ERROR RECOVERY IF REQUIRED. 
INVOKED WITH: 
CALL FROM CTA CEITHER DIRECLY OR VIA "SYSCCI" - COMMON CONTROLLER 
INTERFACE, AN SPF INTERNAL PLS PROCEDURE) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 
3. DADS % IN/OUT DANS BLOCK 
4. DA34 % INPUT DA3¢ BLOCK 
WHERE 
TFD - A TFD WHICH CONTAINS A DEFAULT DDNAME AND POINTERS 
TO A DATA SET NAME STRUCTURE AND DCB. 
DA08 - IS THE TSO DAIR DAO& CONTROL BLOCK USED TO ALLOCATE 
A DATASET. 
DA34¢ - IS THE TSO DAIR DA34 BLOCK USED TO SPECIFY DATASET 
ATTRIBUTES. 


RETURN CODE: 
0 - SUCCESSFUL ALLOCATION AND OPENING OF THE DATA SET. 
1 - UNABLE TO OPEN DATA SET. 
>1 - DAIR RETURN CODE FROM UNSUCCESSFUL ALLOCATION. 


CCONTINUED ON NEXT PAGE) 
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CTl - COMMON ALLOC-OPEN TEMP DATA SET SUB (CONTINUED ) cTi 


NOTES: 
RECOVERY FROM THE FOLLOWING ALLOCATION ERRORS IS ATTEMPTED. 


- IF THE DATA SET TO BE ALLOCATED IS CATALOGED BUT DOES NOT 
EXIST ON THE CATALOGED DASD VOLUME, OR IF THE VOLUME IS NOT 
MOUNTED, CT1 WILL UNCATALOG THE DATA SET AND ATTEMPT ALLOCATION 
AGAIN. 


- IF THE DATA SET TO BE ALLOCATED AND OPENED IS NOT CATALOGED, BUT 
EXISTS ON A DASD VOLUME, THE EXISTING DATA SET IS SCRATCHED, AND 
CT1l WILL ATTEMPT ALLOCATION AGAIN. 


UP TO FOUR ALLOCATION ATTEMPTS ARE MADE. THIS HANDLES MOST CASES 
OF TEMPORARY DATA SETS NOT BEING CLEANED UP AFTER A SYSTEM CRASH. 


WHEN CTl IS INVOKED TO ALLOCATE AND OPEN ‘'SPFLOG '‘, ‘SPFLIST °, OR 
"SPFEDITX"', IT MUST BE EXECUTING UNDER THE SPF MAIN TASK. WHEN IT 
IS INVOKED TO ALLOCATE AND OPEN ‘SPFCNTLX* OR °SPFLISTX' IT MUST BE 
EXECUTING UNDER THE PROCESSOR TASK. THIS IS BECAUSE THE LOG, LIST, 
AND EDIT BACKUP DATA SETS BELONG TO THE SPF MAIN TASK AND MUST BE 
AROUND EVEN WHILE PROCESSOR TASKS ARE ATTACHED AND DETACHED TO 
SUPPORT SPLIT SCREEN. THE TEMPCNTL AND TEMPLIST DATA SETS BELONG TO 
THE PROCESSOR AND WILL BE CLEANED UP BY TASK TERMINATION IF THE 
PROCESSOR TASK TERMINATES ABNORMALLY. 


SINCE CTA (WHICH INVOKES CT1) MAY BE CALLED UNDER EITHER TASK, A 
DUAL SCHEME FOR INVOKING CT1l IS PROVIDED. IF CTA AND CT1l ARE UNDER 
THE SAME TASK, A DIRECT CALL IS PERFORMED. IF CTA IS EXECUTING 
UNDER THE PROCESSOR TASK, AND CTl MUST BE EXECUTED UNDER THE SPF 
MAIN TASK, AN INTERNAL SPF PROCEDURE NAMED "SYSCCI'" (COMMON 
CONTROLLER INTERFACE) IS INVOKED. IT IN TURN EXECUTES POST/WAIT 
LOGIC SO THAT THE SPF MAIN TASK WILL ACTUALLY CALL THE SUBROUTINE. 
WHEN THE SUBROUTINE RETURNS, THE SPF MAIN TASK USES POST/WAIT LOGIC 
TO RETURN TO SYSCCI WITH THE REG 15 RETURN CODE. 


THE SAME LOGIC THAT APPLIES TO CTA INVOKING CT1 ALSO APPLIES TO CTF 
(CLOSE/FREE DATA SETS) INVOKING CT2, SINCE THE DCBS MUST BE OPENED 
AND CLOSED UNDER THE SAME TASK. 


THE FOLLOWING FILE NAMES CAN BE PREALLOCATED. IF CTl RECOGNIZES 
THAT A FILE HAS BEEN PREALLOCATED BY USING READJFCB, IT SKIPS 
ALLOCATION AND GOES IMMEDIATELY TO OPEN THE DATA SET. NO ERROR 
CHECKING OF PREALLOCATED FILES IS DONE. 


SPFLOG - LOG DATA SET 

SPFLIST - LIST DATA SET 

SPFCNTLL - CONTROL CARD DATA SET, LOGICAL SCREEN 1 
SPFCNTL2 - CONTROL CARD DATA SET, LOGICAL SCREEN 2 
SPFLISTL - LISTING DATA SET, LOGICAL SCREEN 1 
SPFLIST2 - LISTING DATA SET, LOGICAL SCREEN 2 
SPFEDITA - FIRST EDIT RECOVERY DATA SET 

SPFEDITB - SECOND EDIT RECOVERY DATA SET 
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CT2 - COMMON CLOSE-FREE TEMP DATA SET SUB CT2 


PURPOSE: 
CT2 IS USED TO CLOSE AND FREE THE DATA SETS THAT WERE ALLOCATED 
AND OPENED BY CTA/CT1. 
INVOKED WITH: 
CALL FROM CTF CEITHER DIRECLY OR VIA "SYSCCI™ - COMMON CONTROLLER 
INTERFACE, AN SPF INTERNAL PLS PROCEDURE) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 
3. DAI8& % INPUT DA1& BLOCK 
WHERE 
DA18& ~- IS THE TSO DAIR DA18 BLOCK USED TO FREE A FILE. 


RETURN CODE: 
0 ~- SUCCESSFUL CLOSE AND FREE OF THE DATA SET. 
>0 ~ DAIR RETURN CODE FROM UNSUCCESSFUL FREE. 


NOTES: 


IF CT2 IS PASSED THE SPFLOG OR SPFLIST TFD, CDP IS CALLED TO 
COMPLETE THE OUTPUT TO THE DATA SET. 


IF THE TFDPREAL FLAG BIT IS ON INDICATING THAT THE CORRESPONDING 
FILE WAS PREALLOCATED, CT2 DOES NOT FREE THE FILE. 


CT2 MAY BE CALLED DIRECTLY BY CTF, OR INDIRECTLY VIA "SYSCCI”. 
THIS DUAL INTERFACE IS REQUIRED FOR THE SAME REASONS THAT CTA 
CALLS CT1 WITH A DUAL INTERFACE. SEE THE DESCRIPTION OF CT1l FOR 
AN EXPLANATION. 
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CUPARMS - COMMON UPDATE USER PARAMETERS ROUTINE. — a CUPARMS 


PURPOSE: 
CUPARMS DOES AN UPDATE IN PLACE OF A MEMBER OF THE SPF PARMS DATA 
SET. THE MEMBER BEING UPDATED IS THE SAME MEMBER THAT WAS READ IN OR 
CREATED DURING SPF INITIALIZATION BY CIPARMS. THE NAME OF THE MEMBER 
IS THE SAME AS THE USER'S TSO LOGON ID. THE DATA WHICH IS WRITTEN 
COMES FROM THE SPF TABLE OF KEYWORD VALUES (TKV). 

INVOKED WITH: 


CALL TO CUPARMS 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - PARMS MEMBER WAS UPDATED AND NO ERRORS DETECTED. 
4 ~- FIND ERROR ATTEMPTING TO FIND THE PARMS MEMBER. 
8 - I70 ERROR ATTEMPTING TO READ THE PARMS MEMBER. 
12 ~ I70 ERROR ATTEMPTING TO WRITE THE PARMS MEMBER. 


NOTES: 


BEFORE WRITING OUT THE TKVY TO THE PARMS DATA SET, A COPY IS MADE AND 
SET UP TO BE ADDRESSED BY TSITKVP. THEN THE SUBROUTINE SOP (SPF 
GUTPUT PARMS) IS CALLED. SOP WAS DESIGNED AS A USER EXIT ROUTINE AND 
CAN BE MODIFIED IF A INSTALLATION REQUIRES THAT DATA BE VERIFIED OR 
MODIFIED BEFORE BEING WRITTEN TO THE PARMS DATA SET. SOP ALSO COPIES 
SOME DATA FROM THE TSV TO THE TKV. FOR MORE INFORMATION SEE THE 
DESCRIPTION OF SOP. 
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CUM - COMMON VERIFY MEMBER NAME ROUTINE CUM 


PURPOSE: 
CVM VERIFIES THAT A MEMBER NAME THAT IS TO BE GENERATED BY SPF IS 
A VALID MEMBER NAME. IT MUST BEGIN WITH AN ALPHA OR 3,#,$ CHARACTER 
AND THE REMAINING 7 CHARACTERS MUST BE ALPHAMERIC. 

INVOKED WITH: 


CALL TO CVM 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. MEMBER CHAR(8) INPUT NAME OF MEMBER TO BE VERIFIED 


RETURN CODES: 
0 - MEMBER NAME IS VALID. 
4 - MEMBER NAME IS INVALID. 


NOTES: 


SUPERZAP CAN BE USED TO MODIFY THIS SUBROUTINE SO THAT SPF WILL 
ALLOW ANY INVALID MEMBER NAME TO BE USED IN CREATING NEW MEMBERS. 
THE CODE CAN BE MODIFIED AND REASSEMBLED TO ALLOW SOME, BUT NOT 
ALL TYPES OF INVALID MEMBER NAMES TO BE GENERATED BY SPF. FOR 
EXAMPLE, THE SUBROUTINE COULD BE MODIFIED TO ALLOW MEMBER NAMES 
au nierege A NUMBER, AND REJECT NAMES THAT INCLUDE SPECIAL 
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CVUSDE - COMMON VERIFY SPF OIRECTORY ENTRY ROUTINE CVSOE 
PURPOSE: 
CVSDE DETERMINES IF A PDS DIRECTORY ENTRY PASSED TO IT IS IN SPF 
DIRECTORY ENTRY FORMAT OR NOT. 


INVOKED WITH: 
CALL TO CVSDE 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. BLDLENT % INPUT BLDL ENTRY 
WHERE 


BLDLENT - IS AN ENTRY FROM THE OS BLDL CONTROL BLOCK. 


RETURN CODES: 
0 - SPF ENTRY. 
4 - NOT SPF ENTRY, NO USER DATA. 
8 - NOT SPF ENTRY, USER DATA NOT IN SPF FORMAT. 


NOTES: 


SPF DIRECTORY ENTRIES ARE 15 HALFWORDS IN LENGTH. THE LAST THREE 
BYTES MUST BE BLANKS, AND CREATION DATE AND LAST MODIFIED DATE MUST 
BE PACKED DECIMAL FIELDS. SEE DATA AREAS SECTION ON SPF DIRECTORY 
ENTRY FORMAT <SDE>. 
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“EBA - EDIT RECOVERY INITIALIZATION ROUTINE EBA 


PURPOSE: 
EBA DETERMINES IF RECOVERY IS PENDING AND PERFORMS THE RECOVERY 
PROCESS INITIALIZATION. IT ALLOCATES AND OPENS THE RECOVERY DATA 
SET AND ESTABLISHES THE BACKUP/RECOVERY CONTROL TABLE CEBT). IT 
ALSO VALIDATES THE OUTPUT DATA SET CHARACTERISTICS IF RECOVERY 
IS INDICATED. 

INVOKED WITH: 


CALL TO EBA 


CALLING SEQUENCE PARAMETERS: 
NONE ~- SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 

0 - NO RECOVERY AVAILABLE IF RECOVERY NOT IN PROGRESS C1ST CALL 
FROM EMP), OR OUTPUT DATA SET ACCEPTABLE IF RECOVERY ALREADY IN 
PROGRESS (2ND CALL FROM EMP). 

4 - RECOVERY AVAILABLE (1ST CALL FROM EMP). 


8 ~- OUTPUT DATA SET NOT ACCEPTABLE (2ND CALL FROM EMP). 


EBA IS ALWAYS CALLED AT THE BEGINNING OF EDIT PROCESSING BY EMP. 
THE RECOVERY PROCESS IS COMPLETED BY A CALL TO EBR. 
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EBE - EDIT BACKUP END ROUTINE , EBE 


PURPOSE: 
EBE FREES CONTROL OF THE RECOVERY DATA SET AND ELIMINATES THE 
BACKUP/RECOVERY CONTROL TABLE CEBT). 

INVOKED WITH: 
CALL TO EBE 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
EBE IS ALWAYS CALLED AT THE TERMINATION OF EDIT PROCESSING. IT I5 


ALSO CALLED WHEN CERTAIN ERRORS ARE ENCOUNTERED DURING THE BACKUP 
OR RECOVERY PROCESS. 
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EBI - EDIT BACKUP INITIALIZATION ROUTINE . EBI 


PURPOSE: 
EBI PERFORMS THE BACKUP PROCESS INITIALIZATION. IT ALLOCATES AND 
OPENS A RECOVERY DATA SET AND ESTABLISHES THE BACKUP/RECOVERY 
CONTROL TABLE CEBT?). 

INVOKED WITH: 


CALL TO EBI 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT. TABLE 
REG 9 => <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
EBI IS CALLED FROM EBS ONLY WHEN "RECOVERY ON" IS INITIALLY 


REQUESTED. THE ACTUAL BACKUP PROCESS IS STARTED AND CONTINUED BY 
CALLS TO EBS. 
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EBR ~ EDIT RECOVERY READ RGUTINE é: CBR 


~ 
PURPOSE? wt 


EBR READS THE RECOVERY DATA SET. .- 


INVOKED WITH: 
CALL TO EBR 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKABE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> IN/OUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 
NOTES: 
EBR IS CALLED TO READ THE RECOVERY DATA SET. FOLLOWING THE 


RECOVERY PROCESS THE BACKUP PROCESS IS IN EFFECT AND CAN BE 
CONTINUED BY CALLS TO EBS. 


wd 
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EBS - EDIT BACKUP STORE RECORD ROUTINE EBS 


PURPOSE: 
EBS STORES DATA IN THE RECOVERY DATA SET. 


INVOKED WITH: 
CALL TO EBS 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> IN/OUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


EBS IS CALLED EVERY TIME A RECORD IS ADDED, DELETED, OR MODIFIED IN 
THE EDIT RECORD CHAIN. THE FIRST TIME EBS IS CALLED FOR A DATA SET 
OR MEMBER THE BACKUP PROCESS IS STARTED. EBI IS CALLED BY EBS IF 
BACKUP/RECOVERY HAD NOT BEEN PREVIOUSLY INITIALIZED THE BACKUP 
PROCESS IS STOPPED BY A CALL TO EBX WHEN THE DATA SET OR MEMBER IS 
SAVED OR CANCELLED OR WHEN THE USER REQUESTS "RECOVERY OFF". 
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EBX - EDIT BACKUP RESET ROUTINE EBX 


PURPOSE: 
EBX RESETS THE BACKUP/RECOVERY CONTROL. 


INVOKED WITH: 
CALL TO EBX 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
EBX STOPS THE BACKUP PROCESS WHEN A DATA SET OR MEMBER IS SAVED OR 


CANCELLED OR WHEN THE USER REQUESTS “RECOVERY OFF". THE BACKUP 
PROCESS CAN BE RESTARTED BY A CALL TO EBS. 
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ECD - EDIT COMMAND DEFINITIONS TABLE ECD 


PURPOSE: 


ECD IS THE EDIT COMMAND DEFINITION TABLE. IT CONTAINS ONE ENTRY 
FOR EACH EDIT PRIMARY COMMAND. THE COMMAND DEFINITION TABLE IS 
INPUT TO THE COMMON COMMAND PARSE (CCP) ROUTINE, AND IS USED FOR 
ERROR CHECKING AND FOR ORDERING PARAMETERS. 


REFERENCED VIA: 


THE ADDRESS OF THE ECD IS IN THE TSC. IT IS SYMBOLICALLY REFERENCED 
BY THE NAME "ECD" DEFINED IN SEGMENT “"ECSDCLS™ CEDIT COMMON SUBS). 


NOTES: 


- THE ECD TABLE IS TERMINATED WITH AN X'FF* CHARACTER. 

- EACH COMMAND DEFINITION WITHIN THE TABLE IS TERMINATED WITH AN 
X'FE’ CHARACTER. 

- EACH PARAMETER DEFINITION WITHIN THE COMMAND DEFINITIONS IS 
TERMINATED WITH AN X'"FD* CHARACTER. 

- IN ADDITION, THE LENGTH OF EACH COMMAND DEFINITION ENTRY IS PART OF 
ae AND THE NUMBER OF PARAMETERS DEFINED IS ALSO PART OF THE 

N : 
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ECR - EDIT CREATE-REPLACE ROUTINE ECR 


PURPOSE: 
ECR PERFORM PROCESSING FOR THE “CREATE” AND “REPLACE” COMMANDS. 


INVOKED WITH: 
CALL TO ECR 


CALLING SEQUENCE PARAMETERS: 
NONE ~ SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 => <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE 
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EOD - EDIT DRIVER ROUTINE 


PURPOSE: 


EDD IS INVOKED BY PMD WHEN OPTION 2 IS SELECTED FROM THE PRIMARY 


OPTION MENU. 
ALLOCATE APPROPRIATE DATA SETS, 
EDITING. 

INVOKED WITH: 


LINK TO SPFEDIT 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> 
2. MENU CHAR(8) 


INPUT 
INPUT 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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TIT CALLS SUBROUTINES TO DISPLAY THE EDIT DATA SET, 
DISPLAY MEMBER LISTS, AND PERFORM 


LOGICAL DISPLAY TABLE 
MENU NAME 
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EDI - EDIT DATA INPUT ROUTINE EDI 


PURPOSE: 


EDI PERFORMS DATA INPUT FOR EDIT. IT IS CALLED AT INITIALIZATION 

TO READ THE INITIAL DATA, AND IS ALSO CALLED IF A "MOVE" OR "COPY® 
PRIMARY COMMAND IS PERFORMED. IN ADDITION TO READING DATA, EDI 
LIMITS THE RECORDS ACTUALLY PUT ON THE EDR CHAIN CFOR A "COPY" 

WITH START/END RECORDS SPECIFIED). IT ALSO CHECK TO SEE IF SEQUENCE 
NUMBERS ARE PRESENT IN THE DATA AND IF LOWER CASE AND/OR INVALID 
CHARACTERS ARE PRESENT. 


INVOKED WITH: 
CALL TO EDI 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. EDT <EDT> IN/OUT EDIT TABLE 
3. TFD <TFD> INPUT INPUT FILE DEFINITION TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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EDO - EDIT BATA OUTPUT ROUTINE EDO 


PURPOSE: 
EDO PERFORMS THE WRITING OF OUTPUT FOR EDIT. IT IS CALLED FOR A 
STANDARD “END” CIF A CHANGE IN THE DATA HAS OCCURRED), IF A "SAVE" IS 
DONE, OR IF A "CREATE" OR “REPLACE” PRIMARY COMMAND IS ISSUED. EDO 
eee AUTO-RENUMBERING IF BOTH NUMBER MODE AND AUTONUM MODE ARE 
N. 

INVOKED WITH: 


CALL TO EDO 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. EDT <EDT> IN/OUT EDIT TABLE 
3. TFD <TFD> INPUT INPUT FILE DEFINITION TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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EFC - EDIT FIND-CHANGE ROUTINE EFC 


PURPOSE: 
EFC IS CALLED TO ANALYZE AND/OR PERFORM THE FIND/CHANGE COMMANDS. 


INVOKED WITH: 
CALL TO EFC 


CALLING SEQUENCE PARAMETERS: 
NONE ~ SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 ~ ALWAYS. 


NOTES: 
NONE. 
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EFR - EDIT FORMAT DISPLAY ROUTINE EFR 


PURPOSE: 
EFR IS CALLED TO FORMAT THE DISPLAY SCREEN. 


INVOKED WITH: 
CALL TO EFR 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 


0 - ALWAYS. 
NOTES: 
NONE. 
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EFT - EDIT FLOW TEXT ROUTINE EFT 


PURPOSE: 
EFT FLOWS TEXT TO SUPPORT BOTH THE “TF” AND “TE” COMMANDS. 


INVOKED WITH: 
CALL TO EFT 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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EGN - EDIT GENERAL NUMBER-RENUMBER ROUTINE EGN 


PURPOSE: 


EGN IS CALLED TO NUMBER OR RENUMBER ALL OF THE STANDARD RECORDS ON 
THE EDR CHAIN. 


INVOKED WITH: 
CALL TO EGN 


CALLING SEQUENCE PARAMETERS: 
NONE ~- SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


EGN USES THE EDTNUMBR FIELD TO DETERMINE WHETHER TO NUMBER, RENUMBER 
OR UNNUMBER THE DATA. 


EDTNUMBR = ‘R* MEANS RENUMBER STARTING AT THE EDTDELTA NUMBER AND 
INCREMENTING BY THE SAME DELTA NUMBER. 

EDTNUMBR = sue ree UNNUMBER, BLANKING OUT EXISTING SEQUENCE 

MBERS. 

EDTNUMBR ‘I' MEANS INITIAL NUMBER OPERATION. MOD FLAGS ARE 

RESET IF APPROPRIATE (I.E. IF MOD FLAGS ARE BEING USED 

AND THE CURRENT MOD FLAG IS TOO LARGE) AND A STANDARD 

NUMBER OPERATION IS PERFORMED. 

"N' COR ANY OTHER CODE) MEANS STANDARD NUMBER OPERATION 

CHANGING THE SEQUENCE NUMBER ONLY IF REQUIRED TO FORCE 

A VALID SEQUENCE NUMBER (I.E. IF THE RECORD ALREADY 

CONTAINS A VALID SEQUENCE NUMBER IT IS NOT CHANGED). 


EITHER NUMBERING OR RENUMBERING RESULTS IN EVERY RECORD CONTAINING 
A VALID ASCENDING SEQUENCE NUMBER. 


EDTNUMBR 
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EGR ~ EDIT GENERAL RESET ROUTINE EGR 


PURPOSE: 
EGR IS CALLED TO RESET THE EDR CHAIN. THIS CONSISTS OF DELETING 
ANY SPECIAL RECORDS THAT ARE ON THE CHAIN CBOUNDS,COLS,MASK, AND 
TABS), MARKING ALL RECORDS NOT-EXCLUDED, AND RESETTING ALL SPECIAL 
FLAGS (=ERR=>, =CHG=>, ETC). 

INVOKED WITH: 


CALL TO EGR 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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ENC - EDIT MOVE-COPY ROUTINE ENC 


PURPOSE: 
EMC PERFORMS PROCESSING FOR THE "MOVE" AND "COPY" COMMANDS. 


INVOKED WITH: 
CALL TO EMC 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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EML - EDIT MESSAGE LINES ROUTINE EML 


PURPOSE: > 


EML HANDLES -CAUTION- AND -WARNING~- MESSAGES FOR EDIT. IT READS 
TWO MESSAGES FROM THE MESSAGE DATA SET AND PUTS THEM ON THE EDR 
CHAIN, AFTER THE FIRST LINE ON THE DISPLAY. 


INVOKED WITH: 
CALL TO EML 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. MSG CHAR(4) INPUT LONG MESSAGE ID 
3. CODE FIXEDC31) INPUT MESSAGE TYPE CODE 
WHERE 
MSG - IS THE IDENTIFIER OF THE FIRST MESSAGE THAT IS TO BE 


PUT ON THE EDR CHAIN. THE SECOND MESSAGE IS ONE DIGIT 
HIGHER IN SEQUENCE (I.E. INPUT OF E702 RESULTS IN 
MESSAGE E702 AND E703 BEING PUT ON THE EDR CHAIN.) 


CODE - IS A CODE THAT IS STORED IN THE EDRTYPE FIELD OF THE 
EDIT RECORDS THAT CONTAIN THE MESSAGES. THE CODES ARE 
TAKEN FROM EDRDCLS AND ARE USED TO DELETE THE MESSAGE 
LINE IF THE CONDITION INDICATED HAS CHANGED. 


RETURN CODE: 


0 - ALWAYS. o) 


NOTES: 


AN EXAMPLE OF A -CAUTION- MESSAGE THAT IS HANDLED BY EML IS THE 
MESSAGE INIDICATING THAT “STANDARD NUMBER MODE HAS BEEN TURNED OFF®. 
THE CODE WILL INDICATE THAT NUMBER MODE IS OFF. IF A NUMBER COMMAND 
TS ISSUED, NUMBER MODE WILL BE TURNED ON, AND THE MESSAGE WILL BE 
ERRONEOUS. THE CODE WHICH IS STORED IN THE EDR IS USED AS A TRIGGER 
TO CAUSE THE MESSAGE EDR TO BE DELETED. 
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EMP - EDIT MENU PROCESSOR ROUTINE EMP 


PURPOSE: 
EMP DISPLAYS THE EDIT DATA SET MENU, AND DISPLAYS ERROR MESSAGES. 
IT CALLS COMMON SUBROUTINES TO ALLOCATE AND OPEN THE APPROPRIATE 
DATA SETS. 

INVOKED WITH: 


CALL TO EMP 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. EDT <EDT> IN/OUT EDIT TABLE 
3. MENU CHAR(8) INPUT MENU NAME 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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EPC - EDIT PROCESS (LINE) COMMANDS ROUTINE  #&# #3 3}. EPC 


PURPOSE: 


EPC PROCESSES EDIT LINE COMMANDS. 


INVOKED WITH: 
CALL TO EPC CFROM EPR) 


CALLING SEQUENCE PARAMETERS: 


NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 


REG 3 -> <EDT> IN/OUT 
REG 9 -> <TLD> INPUT 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


EDIT TABLE 
LOGICAL DISPLAY TABLE 


EPC IS INVOKED BY EPR WHEN ANY EDIT LINE COMMANDS ARE TO BE 
PROCESSED. IT SCANS THE EDIT RECORD CHAIN, PERFORMS VALIDITY 
CHECKING AND, IF NO ERRORS ARE DETECTED, PERFORMS LINE COMMAND 


PROCESSING. 
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EPD - EDIT PROCESS DATA ROUTINE EPD 


PURPOSE: 
EPD IS CALLED TO PROCESS DATA INPUT FROM THE DISPLAY SCREEN. 


INVOKED WITH: 
CALL TO EPD 


CALLING SEQUENCE PARAMETERS: 
NONE ~- SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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EPF - EDIT PROCESS (PRIMARY) FINAL ROUTINE EPF 


PURPOSE: 
EPF PERFORMS ANY FINAL PROCESSING THAT IS REQUIRED TO COMPLETE 
EDIT PRIMARY COMMANDS. THE PROCESSING IS DONE AFTER EDIT LINE 
COMMANDS HAVE BEEN PROCESSED. 

INVOKED WITH: 


CALL TO EPF 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


EPF IS INVOKED BY EPR WHEN FINAL PROCESSING OF A PRIMARY EDIT 
COMMAND IS REQUIRED CAFTER LINE COMMAND PROCESSING HAS BEEN 
PERFORMED). IT PERFORMS VALIDITY CHECKING AND, IF NO ERRORS 
ARE DETECTED, COMPLETES THE PRIMARY COMMAND PROCESSING. 
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EPI - EDIT PROCESS (PRIMARY) INITIAL ROUTINE 


PURPOSE: . 
EPI PERFORMS INITIAL PROCESSING OF EDIT PRIMARY COMMANDS. 


INVOKED WITH: 
CALL TO EPI CFROM EPR) 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


EPI IS INVOKED BY EPR WHEN INITIAL PROCESSING OF A PRIMARY EDIT 
COMMANDS IS REQUIRED CBEFORE LINE COMMAND PROCESSING HAS BEEN 
PERFORMED). IT PERFORMS VALIDITY CHECKING AND, IF NO ERRORS 
ARE DETECTED, PERFORMS INITIAL CIN SOME CASES COMPLETE) PRIMARY 
COMMAND PROCESSING. 
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EPO - EDIT PARTITIONED ORGANIZATION ROUTINE EPO 


PURPOSE: 


EPO PROCESSES PARTITIONED DATA SET. 


PROCESSING IF APPROPRIATE. 


INVOKED WITH: 
CALL TO EPO 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> 
2. EDT <EDT> 


INPUT 
IN/OUT 


RETURN CQDE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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IT CALLS CML TO DO MEMBER LIST 


LOGICAL DISPLAY TABLE 
EDIT TABLE 


LICENSED MATERIAL - PROPERTY OF IBM 


EPP - EDIT OPTIONS-PROFILE ROUTINE EPP 


PURPOSE: 
EPP IS INVOKED TO RETRIEVE AND/OR STORE EDIT PROFILE OPTIONS. 


INVOKED WITH: 
CALL TO EPP 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. EDT <EDT> IN/OUT EDIT TABLE 

3. GETPROF CHAR(8) INPUT GET PROFILE NAME 

4. PUTPROF CHAR(8) INPUT PUT PROFILE NAME 
WHERE 


GETPROF - IDENTIFIES THE PROFILE TO BE RETRIEVED. IF THE NAME 
IS BLANK, NO RETRIEVAL IS PERFORMED. 


PUTPROF - IDENTIFIES THE PROFILE TO BE STORED. IF THE NAME 
IS BLANK, NO STORING IS PERFORMED. 
RETURN CODE: 
0 - ALWAYS. 


NOTES: 
EPP RETRIEVES PROFILE INFORMATION INCLUDING MASK AND TABS LINES FROM 


THE TKV BY CALLING CKVGET. IT MOVES THE INFORMATION INTO THE EDIT 
TABLE. STORING PROFILE INFORMATION IS THE REVERSE OPERATION. 
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EPR - EDIT PROCESS MAIN ROUTINE 


PURPOSE: 
EPR GETS CONTROL WITH THE INPUT DATA SET ALLOCATED AND OPEN. IT 
READS THE DATA IN CEDI), FORMATS THE SCREEN CEFR) AND PERFORMS 
THE LOGICAL EDITING OF THE DATA CEPI,EPD,EPC,EPF). 

INVOKED WITH: 


CALL TO EPR 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. EDT <EDT> IN/OUT EDIT TABLE 


RETURN CODE: 


0 - ALWAYS. 
NOTES: 
NONE. 


EPR 
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EPS - EDIT PHYSICAL SEQUENTIAL ROUTINE EPS 


PURPOSE: 
EPS PROCESSES PHYSICAL SEQUENTIAL DATA SETS. 


INVOKED WITH: 
CALL TO EPS 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. EDT <EDT> IN/OUT EDIT TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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EPX - EDIT "OTHER" DATA SET GRGANIZATION ROUTINE. ; EPX 


PURPOSE: 


EPX PROCESSES DATA SETS THAT ARE NEITHER PARTITIONED NOR SEQUENTIAL. 
IT CAUSES AN ERROR MESSAGE TO BE DISPLAYED, BUT COULD REPLACED TO 


PROCESS OTHER TYPES OF DATA SETS. 


INVOKED WITH: 
CALL TO EPX 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> 
2. EDT <EDT> 


INPUT 
IN/OUT 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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LOGICAL DISPLAY TABLE 
EDIT TABLE 
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ERA - EDIT RECCRD ALLOCATE ROUTINE ERA 


PURPOSE: 
ERA ALLOCATES ONE EDIT RECORD AND STORES ITS ADDRESS IN THE EDIT 
TABLE CEDRPCEDFREE)). ALLOCATION CONSISTS OF UNCHAINING ONE RECORD 
FROM THE FREE CHAIN, OR IF NO RECORDS EXIST ON THE FREE CHAIN, OF 
GETMAINING A DATA BLOCK AND BREAKING IT UP INTO FREE EDIT RECORDS 


WHICH ARE PUT ON THE FREE CHAIN. THE HEADER OF THE NEW EDIT RECORD 
IS ZEROED AND ITS DATA AREA IS BLANKED. 


INVOKED WITH: 
CALL TO ERA 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


WHEN STORAGE IS REQUIRED, AN UNCONDITIONAL GETMAIN IS PERFORMED. 
THIS WILL RESULT IN AN 80A ABEND IF INSUFFICIENT STORAGE EXISTS TO 
SATISFY THE REQUEST. 


THE SIZE OF THE GETMAIN IS 4K. IT IS TAKEN FROM A FIELD IN THE 
EDIT TABLE CEDGMSIZE) WHICH IS INITIALIZED BY ED. 
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ERC - EDIT RECORD CHANGE ROUTINE ERC 


PURPOSE: ” 
ERC MARKS A RECORD AS CHANGED BY SETTING THE CHANGED BIT IN THE EDR 
AND IT ALSO SETS THE OVERALL CHANGED BIT IN THE EDT. THE MOD FLAG 
PART OF THE SEQUENCE NUMBER IS SET (IF APPROPRIATE) AND THE BACKUP 
ROUTINE EBS IS CALLED IF RECOVERY IS ON. 

INVOKED WITH: 


CALL TO ERC 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


ALL ROUTINES THAT CHANGE THE DATA WITHIN AN EDR MUST CALL ERC 
TO INDICATE THAT THE CHANGE WAS MADE. 


THE TYPE OF CHANGE IS INDICATED BY SETTING THE APPROPRIATE BIT 
IN EDTEDRBS WHICH IS OR*ED TO THE EDR THAT IS BEING CHANGED BY 
E 
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ERD ~ EDIT RECORD DELETE ROUTINE ERD 


PURPOSE: 
eget ONE EDIT RECORD FROM THE EDR CHAIN. 
 EDRPCEDCURR) - POINTS TO THE EDR TO BE DELETED FROM THE EDR CHAIN. 
ON O T? 


EDRPCEDCURR) - POINTS TO THE EDR PRECEDING THE DELETED EDR. 
EDRPCEDFREE) - POINTS TO THE DELETED EDR. 
INVOKED WITH: 
CALL TO ERD 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
ERD DECREMENTS THE TOTAL EDR COUNT. 


POINTERS IN THE EDIT TABLE THAT MUST POINT TO EDR'S THAT ARE ON THE 
EDR CHAIN ARE EITHER ZEROED OUT, OR ARE RESET TO POINT TO THE 
PRECEDING OR FOLLOWING EDR ON THE CHAIN. 


ERD INSURES THAT BLOCKS OF EXCLUDED (X'ED) RECORDS ARE CONSISTENT 
AFTER THE DELETION HAS OCCURRED. 


ERD USES EDTSA2 CEDIT TABLE SAVE AREA 2) AS A SAVE AREA SO THAT 
IT CAN CALL A LOWER LEVEL PROGRAM. THIS AREA IS USED INSTEAD OF 
A DYNAMICALLY GETMAINED AREA TO IMPROVE PERFORMANCE SINCE ERD IS 
INVOKED FREQUENTLY. . 
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ERF - EDIT RECORD FREE ROUTINE ERF 


PURPOSE: 
ERF TAKE ONE RECORD CEDR) AND PUTS IT ON THE FREE CHAIN SO THAT IT 
WILL BE AVAILABLE FOR REUSE. 
ON INPUT: 
EDRPCEDFREE) - POINTS TO THE EDR TO BE FREED. 
INVOKED WITH: 


CALL TO ERF 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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- EDIT RECORD INSERT ROUTINE - ERI 


PURPOSE: 


ERI INSERTS ONE EDIT RECORD ONTO THE EDR CHAIN. IN ADDITION TO 
PERFORMING FORWARD AND BACKWARD CHAINING, ERI COMPUTES AN INTERNAL 
EDR SEQUENCE NUMBER FOR THE EDR HEADER. IT ALSO CALLS ERN CEDIT 
RECORD NUMBER) IF SEQUENCE NUMBERS ARE TO BE STORED IN THE DATA. 
ERI CALLS EBS CEDIT BACKUP) IF RECOVERY MODE IS ON, AND INCREMENTS 
va eueune EDR COUNT AND THE TOTAL STANDARD EDR COUNT. 

EDRPCEDAFTER) - POINTS TO THE EDR AFTER WHICH THE INSERTION 

IS TO BE MADE. 
EDRPCEDFREE) - POINTS TO THE EDR TO BE INSERTED. 


INVOKED WITH: 


CALL TO ERI 


CALLING SEQUENCE PARAMETERS : 


NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> ~ IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 


0 - ALWAYS. 


NOTES: 
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ERN - EDIT RECORD NUMBER ROUTINE ERN 


PURPOSE: 
A ENPUTS A SEQUENCE NUMBER INTO A RECORD THAT IS ON THE EDR CHAIN. 
EDRPCEDFREE) - POINTS TO THE EDR WHICH IS TO BE SEQUENCE NUMBERED. 
INVOKED WITH: 


CALL TO ERN 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT>. IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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ERO - EDIT RECORD ORIGINAL ROUTINE 


PURPOSE: 
ERO MAKES A COPY OF AN ORIGINAL RECORD CONE THAT WAS INITIALLY READ 
aN aReu: QUEUES IT TO AN ORIGINAL RECORD CHAIN. 
EDRP( EDFREE) - POINTS TO THE ORIGINAL EDR TO BE COPIED. 
INVOKED WITH: 


CALL TO ERO 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
ERO IS CALLED ONLY FROM ERD. 
KEEPING A COPY OF ORIGINAL EDR'S ALLOWS A DETERMINALTION AT SAVE 


TIME OF WHAT WAS DELETED FROM THE ORIGINAL DATA. THIS CAPABILITY 
IS NOT CURRENTLY UTILIZED. 
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ERR - EDIT RECORD RESET ROUTINE ERR 


PURPOSE: P 
ERR TAKE ONE RECORD CEDR) AND PERFORMS THE CLEANUP NECESSARY TO 
REMOVE A COMMAND THAT WAS ASSOCIATED WITH IT. THIS INCLUDES CLEARING 
THE COMMAND BIT, FREEING THE EDR EXTENSION IF APPROPRIATE, AND 
HANDLING EXCLUDED LINE CONSIDERATIONS. ERR DECREMENTS THE COMMAND 
COUNT AND INSURES THAT THE CHAIN OF EDR‘'S WITH ASSOCIATED COMMANDS IS 
AW? ENeUR AS ARE THE POINTER TO THE FIRST AND LAST COMMAND EDR. 
0 : 

EDRPCERRP) - POINTS TO THE EDR TO BE RESET. 
INVOKED WITH: 


CALL TO ERR 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
THE COMMAND COUNT IS DECREMENTED, POINTERS TO THE FIRST AND LAST 


EDR CONTAINING COMMANDS ARE UPDATED IF REQUIRED, AND THE CHAIN 
OF ERS'S CONTAINING COMMANDS IS ALSO UPDATED IF REQUIRED. 
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ERS - EDIT RECORD SHOW ROUTINE 


PURPOSE: 


ERS MARKS A RECORD AS NOT EXCLUDED. 
ON INPUT: 


EDRPCEDXCURR) - POINTS TO THE EDR TO BE ‘UN'~EXCLUDED. 


INVOKED WITH: 
CALL TO ERS 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 


REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 
NOTES: 


ERS INSURES THAT BLOCKS OF EXCLUDED (X'ED) RECORDS ARE CONSISTENT 


AFTER THE EDR IS RESET SO IT IS NOT EXCLUDED. 
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ERX - EDIT RECORD EXCLUDE ROUTINE ERX 


PURPOSE: 
sae A RECORD AS EXCLUDED. 
EDRPCEDXCURR) ~ POINTS TO THE EDR TO BE EXCLUDED. 
INVOKED WITH: 


CALL TO ERX 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 
NOTES: 


ERX INSURES THAT BLOCKS OF EXCLUDED (X"ED) RECORDS ARE CONSISTENT 
AFTER THE EDR IS RESET SO IT IS EXCLUDED. 
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EST - EDIT SPLIT TEXT ROUTINE EST 


PURPOSE: 
EST SPLITS TEXT INTO TWO LINES AND INSERTS ONE OR MORE LINES BETWEEN 
THE PARTS OF THE TEXT. IT IS INVOKED WHEN THE "TS" LINE COMMAND 
IS PROCESSED. 

INVOKED WITH: 


CALL TO EST 


CALLING SEQUENCE PARAMETERS: 
NONE - SPECIAL SPF EDIT LINKAGE CONVENTIONS ARE USED: 
REG 3 -> <EDT> IN/OUT EDIT TABLE 
REG 9 -> <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE 
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ETC - EDIT TABLE CLEANUP ROUTINE ETC 


PURPOSE: 
ETC IS INVOKED TO FREE THE EDIT TABLE. 


INVOKED WITH: 
CALL TO ETC 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. EDT <EDT> IN/OUT EDIT TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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ETL - EDIT LINE COMMANDS TABLE ETL 


PURPOSE: 


ETL IS THE EDIT LINE COMMAND DEFINITION TABLE. IT CONTAINS ONE ENTRY 
FOR EACH EDIT LINE COMMAND. THE LINE COMMAND DEFINITION TABLE IS 
REFERENCED BY EPC IN VALIDATING AND PROCESSING LINE COMMANDS. 


REFERENCED VIA: 


THE ADDRESS OF THE ETL IS IN THE TSC. IT IS SYMBOLICALLY REFERENCED 
BY THE NAME “ETL™ DEFINED IN SEGMENT "ECSDCLS” CEDIT COMMON SUBS). 


NOTES: 


THE ETL TABLE IS TERMINATED WITH AN X'FF* CHARACTER. EACH COMMAND 
DEFINITION ENTRY IS FIXED LENGTH. THE ENTRIES INCLUDE THE COMMAND 
NAME, THE COMMAND TYPE (MOVE, COPY, AFTER, ETC), THE PASS (1-3) ON 
WHICH THE COMMAND SHOULD BE EXECUTED, THE DEFAULT SUFFIX, A CURSOR 
POSITION CODE, INVALID LINE MASK AND THE INDEX IN THE TSC OF THE 
ROUTINES THAT IS TO BE EXECUTED WHEN THE COMMAND IS ENTERED. 
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ETS - EDIT TABLE SETUP ROUTINE ETS 


PURPOSE: 
ETS IS INVOKED TO GETMAIN AND INITIALIZE THE EDIT TABLE. 


INVOKED WITH: 
CALL TO ETS 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. EDTPTR PTRC31) OUTPUT PTR TO THE GETMAINED EDT 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


THE PTR WHICH IS RETURNED BY ETS SHOULD BE LOADED INTO REG 3 BEFORE 
CALLING EDIT SUBROUTINES. 
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FOR - FOREGROUND PROCESSOR ROUTINE FOR 


PURPOSE: 


FOR PROCESSES FOREGROUND SUBOPTIONS. A FOREGROUND SUBOPTION MENU IS 
DISPLAYED AND THE APPROPRIATE SPFPROCS DATASET MEMBER IS READ AND 
PROCESSED. A TSO COMMAND MAY BE GENERATED FROM TRE USER INPUT AND 

A COMMAND PROTOTYPE IN THE SPFPROCS DATASET. FOR CALLS COMMON 

Soe pene CAT TO EXECUTE A TSO COMMAND OR CLIST, IF SPECIFIED IN THE 


INVOKED WITH: 
LINK TO SPFFOR CFROM UTIL OR PMD) 


CALLING SEQUENCE PARAMETERS: 


I. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. MENUID CHAR(C8) INPUT MENU NAME 
WHERE 


MENUID - INDICATES THE FOREGROUND SUBOPTION MENU TO BE 
DISPLAYED. THIS PARAMETER ALSO IS THE NAME OF THE 
BORNE DATASET MEMBER TO BE USED TO GENERATE THE 
OMM ; 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


THE FOREGROUND SELECTION MENU IS PROCESSED BY OBJECT MODULE UTIL, NOT 
THE FOR OBJECT MODULE. SEE THE DESCRIPTION OF OBJECT MODULE UTIL FOR 
FURTHER INFORMATION. 


THE INSTALLATION CAN CREATE NEW SPF OPTIONS SIMILAR TO OPTION 4 OR 

ADDITIONAL OPTION 4 SUBOPTIONS WITHOUT MAKING ANY PROGRAM 

CCARMAR ONC?” SEE INSTALLATION AND CUSTOMIZATION GUIDE FOR FURTHER 
FO N. 
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JOB - BACKGROUND PROCESSOR ROUTINE JOB 


PURPOSE: 


JOB IS INVOKED WHEN OPTION 5 IS SELECTED FROM THE PRIMARY OPTION 
MENU. IT DISPLAYS THE BACKGROUND SELECTION MENU (JOBA) AND 
GENERATES JCL BY MERGING USER INPUT THAT IS ENTERED FROM A SECONDARY 
BACKGROUND MENU AND A JCL PROTOTYPE READ FROM THE SPFPROCS DATA SET. 
JCL IS WRITTEN TO A TEMPORARY DATA SET (C'USERID.SPFTEMPX.CNTL’) AND 
SUBMITTED TO THE JOB STREAM BY CALLING SUBROUTINE CSB. 


INVOKED WITH: 
LINK TO SPFJOB (FROM PMD) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. MENUID CHAR(8) INPUT MENU NAME 
WHERE 


MENUID - INDICATES THE MENU TO BE DISPLAYED. IF THE FIRST 
CHARACTER OF THIS PARAMETER IS '%*, THEN MENUID(C2:7) 
CONTAINS A SELECTION MENU ID. IF THE FIRST CHARACTER 
TIS NOT 'X%", THEN MENUID(1:8) CONTAINS THE MENU ID OF 
A SECONDARY MENU TO BE DISPLAYED, AND THE SELECTION 
MENU IS BYPASSED. 


IF THE SELECTION MENU IS NOT BYPASSED, UPON RETURN 
FROM A SECONDARY MENU, A TERMINATION SELECTION MENU IS 
DISPLAYED. THE TERMINATION SELECTION MENU ID IS 
OBTAINED BY INCREMENTING THE LAST CHARACTER OF THE 
SELECTION MENU ID BY 1 DECIMAL. FOR EXAMPLE, IF MENUID 
CONTAINS ‘*JOBA', THEN THE SELECTION MENU ID IS 'JOBA’ 
AND THE TERMINATION SELECTION MENU ID IS 'JOBB’. 


RETURN CODES: 
0 - ALWAYS. 


NOTES: 


THE INSTALLATION CAN CREATE NEW SPF OPTIONS SIMILAR TO OPTION 5 BY 
PASSING A MENU ID OTHER THAN **%JOBA® TO THIS MODULE. ADDITIONAL 
OPTION 5 SUBOPTIONS CAN ALSO BE ADDED WITHOUT MAKING ANY PROGRAM 
SHEAR GRO” THE INSTALLATION AND CUSTOMIZATION GUIDE FOR FURTHER 
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MERR - COMMON MENU ERROR ROUTINE MERR 


PURPOSE: 
THE MENU ERROR ROUTINE IS CALLED TO DISPLAY ERROR MESSAGES AFTER A 
MENU HAS BEEN PROCESSED BY COMMON SUBROUTINE MHA. MERR ALSO CAUSES 
THE MENU FO BE RE-PROCESSED. THE CURSOR IS POSITIONED TO THE FIELD 


CONTAINING THE ERROR CAS INDICATED BY THE PARMID PARAMETER), AND THE 
AUDIBLE ALARM IS SOUNDED IF SPECIFIED IN THE MESSAGE. 


INVOKED WITH: 
CALL TO MERR 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> IN/OUT LOGICAL DISPLAY TABLE 
2. MSGID CHAR(4) INPUT ERROR MESSAGE ID 

3. PARMID  FIXEDC31) INPUT PARAMETER CURSOR ID 
4. PARMI x INPUT PARAMETER FOR MESSAGE 
..  PARMN x INPUT PARAMETER FOR MESSAGE 
WHERE 


PARMID - IDENTIFIES THE PARAMETER IN THE PREVIOUS CALL TO THE 
MENU HANDLER WHICH CORRESPONDS TO THE FIELD IN ERROR. 
THE CURSOR WILL BE POSITIONED TO THIS PARAMETER. IF 
THIS PARAMETER CONTAINS A FULLWORD ZERO, THE CURSOR 
WILL BE PLACED ACCORDING TO THE SPECIFICATIONS ON THE 
MENU ACTION STATEMENTS. 


PARMCS) - OPTIONAL PARAMETERS ARE USED AS SUBSTITUTIONAL VALUES 
IN THE SPECIFIED MESSAGE. ANY VALUES THAT ARE VALID 
IN CALLING CMSG MAY BE USED. A MAXIMUM OF 50 
PARAMETERS MAY BE SPECIFIED. 


RETURN CODE: 
SAME AS MHA. 


NOTES: 


MERR IS LIKE AN ALTERNATE ENTRY TO THE MENU HANDLER COBJECT MODULE 
MHA). MERR SETS TLDMERRC ON AND CALLS MHA. 


A CALL TO MERR ACTUALLY RESULTS IN MERR CALLING MHA, MHA CALLING 
CERR, CERR CALLING CMSG AND CDISPL. 


THE MERR PARAMETER LIST MUST BE TERMINATED BY A VLIST FLAG. 


WHEN AN ERROR MESSAGE IS DISPLAYED VIA MERR, THE TERMINAL USER MAY 
PRESS PF1l TO OBTAIN A SECOND LEVEL MESSAGE ON LINE 3. IF PFl1 IS 
AGAIN PRESSED, TUTORIAL MODE IS ENTERED AT AN APPROPRIATE PAGE. 
WHEN THE USER EXITS FROM TUTORIAL MODE, THE SCREEN IS RESTORED. 


THE CALLING PROGRAM MUST BE PREPARED FOR ALTERATIONS TO ANY INPUT 
FIELD ON THE MENU. THE NEW INPUT FIELDS ARE RETURNED IN THE SAME 
MANNER AS IN THE PREVIOUS CALL TO THE MENU HANDLER. 


ERROR MESSAGES ARE OBTAINED BY CALLING OBJECT MODULE CMSG. SEE 


THE INSTALLATION AND CUSTOMIZATION GUIDE FOR A DESCRIPTION OF SPF 
MESSAGE FORMATS. 
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MHA - COMMON MENU HANDLER ROUTINE MHA 


PURPOSE: 
MHA IS CALLED TO READ, DISPLAY AND PROCESS A MENU FROM THE SPFMENUS 
DATA SET. MHA INITIALIZES FIELDS ON THE MENU FROM PASSED PARAMETERS, 
AND FROM THE MENU DEFINITION READ FROM THE SPFMENUS DATA SET. AFTER 
READING INPUT FROM THE TERMINAL, MHA PASSES INFORMATION BACK TO THE 
CALLING PROGRAM VIA THE CALLING SEQUENCE PARAMETERS. 

INVOKED WITH: 


CALL TO MHA 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> IN/OUT LOGICAL DISPLAY TABLE 
2. MENUID  CHARC8) INPUT MENU NAME 
3. OPTIONS FIXED(31) INPUT CONTROL OPTIONS 
4. PARMI x IN/OUT | PARAMETER FOR THE MENU 

.  PARMN x IN/OUT PARAMETER FOR THE MENU 
WHERE 

MENUID ~ IS THE NAME OF A MEMBER OF THE SPFMENUS DATA SET TO BE 
PROCESSED. 


OPTIONS - THIS PARAMETER SPECIFIES WHICH OPTIONS ARE TO BE USED. 
0 - NO SPECIAL OPTION REQUESTED. 
1 - RETURN IF NOT FOUND OPTION. IF THIS OPTION IS 
SPECIFIED, MHA WILL RETURN TO THE CALLER IF THE 
REQUESTED MENU IS NOT FOUND IN THE SPFMENUS 
DATA SET. SEE RETURN CODE SECTION BELOW. 
2 - NON-DISPLAY. THIS OPTION CAUSES THIS ROUTINE TO 
BUILD THE MENU IN THE TLS, BUT NOT TO DISPLAY OR 
AWAIT RESPONSE. THE CALLING PROGRAM MAY, FOR 
EXAMPLE, USER MERR TO DISPLAY THE MENU. 
3 - BOTH 1 AND 2 ABOVE. 
PARMC(S) - OPTIONAL PARAMETERS THAT ARE REFERENCED BY THE MENU 
ACTION STATEMENTS, WHERE VALUES ARE TO BE RETURNED 
CAND/OR PASSED TO THE MENU). A MAXIMUM OF 100 OPTIONAL 
PARAMETERS IS SUPPORTED. 
RETURN CODE: 
0 - NORMAL RETURN. 
4 - MENU NOT FOUND CONLY IF QPTION 1 OR 3 IS SPECIFIED). 
998 ABEND - MHA TERMINATES WITH ABEND 998 IF AN ERROR IS ENCOUNTERED 
PROCESSING THE MENU AND IT IS NOT POSSIBLE TO PROCEED. 
NOTES: 
THE MHA PARAMETER LIST MUST BE TERMINATED WITH A VLIST FLAG. 


SEE THE INSTALLATION AND CUSTOMIZATION GUIDE FOR MORE INFORMATION 
ON MENU FORMATS. 
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MNT - MENU TESTER (DEBUGGING AID) ROUTINE MNT 


PURPOSE: 


MNT IS A TESTING ROUTINE USED TO DISPLAY A MENU SO THAT ITS LAYOUT 
CAN BE EXAMINED. 


INVOKED WITH: 
LINK TO SPFTMENU CFROM PMD) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
MNT IS INVOKED BY KEYING "TESTMENU”™ ON THE PRIMARY OPTION MENU. 


MNT CALLS MHA WITH 50 SUBSTITUTIBLE PARAMETERS. MENUS WITH MORE THAN 
50 PARAMETERS CANNOT BE TESTED WITH TESTMENU. 
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OPT - SPF PARAMETER OPTION ROUTINE 


PURPOSE: 


OPT 


OPT IS INVOKED WHEN OPTION 0 IS SELECTED FROM THE PRIMARY OPTION 
MENU. IT DISPLAYS THE SPF PARAMETER OPTIONS MENU, AND THEN EITHER 


THE TERMINAL CHARACTERISTICS MENU, 


THE LOG/LIST DEFAULTS MENU, OR 


THE PROGRAM FUNCTION KEY DEFINITION MENU. PARAMETERS ARE VALIDATED 
AND THE INFORMATION IS PLACED IN THE TSV OR TKV. 


INVOKED WITH: 
LINK TO SPFOPT (FROM PMD) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT 
2. PARM CHARC8) INPUT 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


LOGICAL DISPLAY TABLE 
MENU NAME 


THE INITIAL MENU NAME IS PASSED TO THIS PROGRAM FROM PMD VIA THE 
SECOND PARAMETER OF THE PRIMARY OPTION MENU. MENU NAME “"OPTOO" 
(SPF PARAMETER OPTIONS MENU) IS USED TO INDICATE OPTION 0 WAS 
SELECTED. MENU NAMES “OPTO1™ CTERMINAL CHARACTERISTICS MENU), 
"OPTO2" CLOG/LIST DEFAULTS MENU), OR "OPTO3”" CPROGRAM FUNCTION KEY 
DEFINITION MENU) INDICATE OPTION 0.1, 0.2, OR 0.3 WERE SELECTED 


RESPECTIVELY. 


IF SESSION MANAGER RELEASE 2 IS INSTALLED, THE TERMINAL 


CHARACTERISTICS MENU IS CHANGED TO 


"VOPTO1ISM”". THIS MENU HAS MENU 


AND ACTION STATEMENTS AFTER THE <END> STATEMENT. WHEN THESE LINES 
ARE MOVED TO THEIR APPROPIATE PLACES, IT ALLOWS THE USER TO CONTROL 
GOING INTO SESSION MANAGER MODE FOR TSO MESSAGES OUTSIDE OF PRIMARY 


OPTIONS 4 AND 6. 


THE PROGRAM FUNCTION KEY DEFINITION MENU IS EITHER "OPTOSA", 
"OPTO3B", OR "OPTO3C". THE PROPER MENU IS SELECTED BASED ON THE 
TERMINAL TYPE AND THE NUMBER OF PF KEYS ENTERED ON THE TERMINAL 


CHARACTERISTICS MENU. 
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PFT - PROCESSOR FINAL TERMINATION ROUTINE PFT 


PURPOSE: 


PFT IS CALLED BY PMD WHEN SPF TERMINATION HAS BEEN REQUESTED. 
IT DISPLAYS ONE OF THE FINAL MENUS CLOG, LIST, OR LOG/LIST), AND 
THEN HANDLES THE DISPOSITION OF THE LOG AND LIST DATA SETS. 


INVOKED WITH: 
CALLED BY PMD 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - NORMAL RETURN, COMPLETE TASK TERMINATION. 
4 - TERMINATION ABORTED, RETURN TO PRIMARY OPTION MENU. 


NOTES: 
NONE. 


LICENSED MATERIAL - PROPERTY OF IBM PROGRAM ORGANIZATION 231 


PND - PROCESSOR MAIN DRIVER ROUTINE | PMD 


PURPOSE: 
PMD IS INVOKED FROM. THE SPF MAIN TASK. IT DISPLAYS THE PRIMARY 
OPTION MENU C"APRIOPT™) AND THEN LINKS TO A LOAD MODULE WHOSE NAME 


IS TAKEN FROM THE PRIMARY OPTION MENU, BASED ON THE OPTION SELECTED 
BY THE USER. 


INVOKED WITH: 
ATTACH TO SPFPMD (FROM SMI OR SMA) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TYPE FIXEDC31) INPUT ENTRY TYPE - 1CINIT), 2CRESTART) 
3. CODE FIXEDC31) INPUT CODE DEPENDS ON ENTRY TYPE 
WHERE 

CODE - IF TYPE 1 ENTRY CSPF INITIALIZATION) CODE IS: 


0-3 - SUCCESSFUL INITIALIZATION 
>3 - INITIALIZATION FAILED (SEE MENU PMDPIER 
FOR A LIST OF REASONS). 


- IF TYPE 2 ENTRY (SPLIT SCREEN OR REATTACH) CODE IS: 
0 - SPLIT SCREEN 
N - 'N’ IS THE ABEND CODE FROM PMD TASK 
TERMINATION WHICH IS TO BE DISPLAYED ON THE 
PRSTRT (BOX) MENU. 
RETURN CODE: 


0 - ALWAYS. 


NOTES: 


WHEN A VALID OPTION IS SELECTED FROM THE PRIMARY OPTION MENU, TWO 
NAMES ARE RETURNED. PMD LINKS TO THE FIRST OF THE TWO NAMES AND 
PASSES THE SECOND NAME AS A PARAMETER CALONG WITH THE TLD). 


IF THE PROCESSOR TASK ABENDS, THE SPF MAIN TASK REATTACHES SPFPMD 


AND PASSES IT THE TASK COMPLETION CODE. PMD THEN CALLS PRS TO LOG 
THE ABEND INFORMATION AND DISPLAY THE RESTART MENU. 
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PRS ~- PROCESSOR RESTART ROUTINE PRS 


PURPOSE: 
PRS IS CALLED BY PMD WHEN PMD IS BEING REATTACHED BECAUSE OF A 


PREVIOUS TASK ABEND. IT LOGS OUT A MINI-DUMP OF ABEND INFORMATION 
Me THE LOG DATA SET. IT THEN FORMATS AND DISPLAYS THE ABEND (BOX) 


INVOKED WITH: 
CALLED BY PMD 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. CODE FIXEDC31) INPUT PREVIOUS TASK TERMINATION CODE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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PTC = TSO COMMAND PROCESSOR ROUTINE PTC 


PURPOSE: 
PTC IS INVOKED WHEN OPTION 6 IS SELECTED FROM THE PRIMARY OPTION MENU 
AND ALLOWS EXECUTION OF TSO COMMANDS AND CLISTS UNDER SPF. 

INVOKED WITH: 
LINK TO SPFTSO CFROM PMD) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
PTC CALLS OBJECT MODULE CAT TO EXECUTE THE COMMAND OR CLIST. 


SEE THE NOTES SECTION OF OBJECT MODULE CAT FOR A LIST OF 
RESTRICTIONS. 
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SCN - BACKGROUND SCAN ROUTINE SCN 


PURPOSE: 


SCN IS EXECUTED IN THE BACKGROUND AS THE FIRST JOBSTEP OF BACKGROUND 
JOBS SUBMITTED VIA THE IBM SUPPLIED BACKGROUND PROCESSING’SUB-OPTIONS 
COPTION 5). THIS JCL IS GENERATED FROM JCL PROTOTYPES IN THE 
SPFPROCS DATA SET. THE PROGRAM SEARCHES A CONCATENATION OF 
PARTITIONED DATA SETS FOR A SPECIFIED MEMBER AND, IF THE MEMBER IS 
FOUND, COPIES IT TO A SEQUENTIAL TEMPORARY DATA SET WHERE IT SERVES 
AS INPUT TO A PROCESSING PROGRAM IN A SUBSEQUENT JOBSTEP. THIS 
FUNCTION IS NEEDED TO SUPPORT HIERARCHICAL LIBRARIES. 


INVOKED WITH: 


/73CAN EXEC PGM=SPFSCAN,PARM="MEMNAME',COND=(12,LE) 
//STEPLIB DD DSN=SPF22.MOD1.SPFLOAD,DISP=SHR 

/7IN DD DSN=DSNAME1,DISP=SHR 

// DD DSN=DSNAME2,DISP=SHR 

// DD DSN=DSNAME3,DISP=SHR 

/f DD DSN=DSNAME4,DISP=SHR 

//0UT DD UNIT=SYSDA,DISP=(NEW,PASS) ,SPACE=C(CYL,(€2,2)), 
// DSN=&TEMP1 


WHERE 


MEMNAME 
DSNAME1 
DSNAME2 
DSNAME3 
DSNAMES 


THE PDS MEMBER BEING SEARCHED FOR 
FIRST PDS TO BE SEARCHED 
SECOND PDS TO BE SEARCHED 
THIRD PDS TO BE SEARCHED 
FOURTH PDS TO BE SEARCHED 


CALLING SEQUENCE PARAMETERS: 
1. MEMBER x INPUT PARTITIONED DATA SET MEMBER NAME 
WHERE 
MEMBER - IS THE STANDARD OS PARAMETER LIST. THE FIRST TWO BYTES 


CONTAIN THE LENGTH OF THE PARAMETER IN BINARY. THE 
LENGTH IS FOLLOWED BY A 1 TO 8 BYTE MEMBER NAME. 


RETURN CODES: 


0 - NORMAL RETURN, MEMBER FOUND AND COPIED. 
12 - MEMBER NOT FOUND. 


16 - UNABLE TO OPEN INPUT DCB. 

20 - I70O ERROR ON INPUT DATA SET. 

24 - UNABLE TO OPEN OUTPUT DCB. 

28 - I70 ERROR ON OUTPUT DATA SET. 
NOTES: 


IT IS RECOMMENDED THAT ALL DATA SETS BEING SCANNED HAVE THE SAME 
BLOCK SIZE. I70 ERRORS MAY RESULT IF THE BLOCK SIZE OF THE FIRST 
eT eREE IS SMALLER THAN OTHER DATA SETS IN THE CONCATENATION 
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SIP - SPF INPUT PARMS EXIT ROUTINE SIP 


PURPOSE: 
SIP IS AN, EXIT ROUTINE THAT CAN EXAMINE AND MODIFY SPF PARAMETERS 
AFTER THEY HAVE BEEN READ FROM THE PARMS DATA SET, AND BEFORE THEY 
ARE USED FOR SPF PROCESSING. IT ALSO MOVES SELECTED PARAMETERS 
FROM THE TKV TO THE TSV. 

INVOKED WITH: 


CALL TO SIP CFROM CIPARMS) 


CALLING SEQUENCE: 
l. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


SIP IS DESIGNED TO PROVIDE A SIMPLE INTERFACE FOR INSTALLATIONS THAT 
REQUIRE MODIFICATION TO SPF USER PARMS ON INPUT. IT PROVIDES AN 
INTERFACE TO CKVGET AND CKVPUT TO RETRIEVE AND THEN STORE BACK 
SELECTED USER PARAMETERS. IT ALSO PROVIDES ADDRESSABILITY TO SOME 
COMMON SPF TABLES. BY MODIFYING, ASSEMBLING, AND LINK EDITING SIP AN 
INSTALLATION CAN PERFORM PARAMETER VALIDATION/MODIFICATION AND STILL 
MAINTAIN A CLEAN INTERFACE WITH OTHER SPF MODULES. 


SIP IS LINK EDITED INTO SPFMAIN. 

THE PARAMETERS THAT ARE MODIFIED BY SIP ARE NOT IMMEDIATELY WRITTEN 
OUT TO THE PARMS DATA SET. THEY WILL NORMALLY BE WRITTEN OUT AT 
Sponpecraaee AND MAY BE WRITTEN OUT AT OTHER TIMES DURING SPF 


A SIMILAR TYPE OF EXIT IS PROVIDED WHEN SPF PARAMETERS ARE WRITTEN 
TO THE PARMS DATA SET. SEE THE DESCRIPTION OF OBJECT MODULE SOP. 
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SMA - SPF MAIN ATTACH ROUTINE SMA 


PURPOSE: 
SMA IS CALLED BY SMI AND SMC TO ATTACH A PROCESSOR TASK (SPFPMD). 
IT IS ALSO CALLED TO DETACH SPFPMD AND CLEAN UP THE ASSOCIATED TLD. 


SMA CONTAINS THE STAI EXIT ROUTINE THAT IS ENTERED IF THE PROCESSOR 
TASK ABENDS. 


INVOKED WITH: 
CALL SMA CFROM SMI AND SMC) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE (TLDO) 
2. PMDTYPE FIXED(C31) INPUT PMD ENTRY TYPE 

3. PMDCODE FIXEDC31) INPUT PMD INPUT CODE 

WHERE 


PMDTYPE ~- ENTRY TYPE FOR PMD CSEE PMD). 
PMDCODE - ENTRY CODE FOR PMD (SEE PMD). 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


SMA IS FIRST CALLED BY SMI TO CREATE THE FIRST PROCESSOR TASK. SMC 
CALLS SMA TO CREATE ANOTHER PROCESSOR TASK WHEN THE SPLIT PF KEY IS 
PRESSED. SMC ALSO CALLS SMA TO DETACH THE PROCESSOR TASK AND CLEAN 
UP THE TLD WHEN A PROCESSOR TASK TERMINATES CNORMAL OR ABNORMAL). 
ABNORMAL TERMINATION CAUSES A REATTACH OF SPFPMD. 
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SMC - SPF MAIN CONTROLLER ROUTINE SHC 


PURPOSE: 
SMC INTERFACES BETWEEN A PROCESSOR TASK AND THE TERMINAL. IT 
GENERATES AN OUTPUT STREAM USING THE LOGICAL SCREEN TABLES (TLS) 
FROM THE PROCESSORS. IT CALLS THE COMMON SUBROUTINE CTPUT TO 
OUTPUT TO THE TERMINAL AND THEN READS FROM THE TERMINAL USING THE 
COMMON SUBROUTINE CTGET. AFTER THE INPUT IS RECEIVED, THE 
ee ID CAID) IS ANALYZED AND THE INPUT DATA IS MOVED TO THE 

INVOKED WITH: 


CALL TO SMC CFROM SMD) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE (TLDO) 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
THE REDISPLAY KEY (PA2) AND THE SPLIT, SWAP, CURSOR, AND PRINT PF 


KEYS ARE COMPLETLY PROCESSED BY SMC. OTHER KEYS CAUSE CONTROL TO 
BE PASSED TO THE PROCESSOR TASKS VIA POST/WAIT LOGIC. 
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SMD - SPF MAIN DRIVER ROUTINE SMD 


PURPOSE: 
SMD IS INVOKED FROM THE SPF DRIVER (MODULE SPF). IT LOADS SPFTBLS, 
SPFSUBS, AND SPFTCM. THEN SMD CALLS SMI AND IF THERE IS NO 


INITIALIZATION ERROR IT CALLS SMC. SMD CONTAINS THE STAX EXIT 
ROUTINE THAT IS ENTERED IF THE PAl KEY IS PRESSED. 


INVOKED WITH: 
LINK TO SPFMAIN CFROM SPF) 


CALLING SEQUENCE PARAMETERS: 


1. TSOPARM PTRC31) INPUT ADDR OF TSO PARAMETER LIST 
2. DCB % INPUT ADDR OF SPFLIB DCB, OR ZERO 
WHERE 


TSOPARM - IS THE ADDRESS OF THE FOUR-ADDRESS LIST PASSED BY 
THE TSO TMP TO ANY COMMAND PROCESSOR. THE FOUR 
ADDRESSES ARE: 


1. CBUF - THE TSO COMMAND BUFFER CONTROL BLOCK 
2. UPT - THE TSO USER PROFILE TABLE 

3. PSCB - THE TSO PROTECTED STEP CONTROL BLOCK 
4. ECT - THE TSO ENVIRONMENT CONTROL TABLE 


DCB - IS THE ADDRESS OF AN OPEN DCB, IF SPFLIB WAS 
ALLOCATED PRIOR TO SPF EXECUTION. THE DCB IS USED 
AS THE TASKLIB DCB WHEN ATTACHING SPFPMD. 
ZERO IS PASSED IF SPFLIB WAS NOT ALLOCATED. 
RETURN CODE: 


0 - ALWAYS. 


NOTES: 
THE TSOPARM LIST CONTAINS THE STANDARD PARAMETERS THAT ARE PASSED 


TO ANY TSO COMMAND PROCESSOR. SEE “GUIDE TO WRITING A TERMINAL 
MONITOR OR A COMMAND PROCESSOR" FOR MORE INFORMATION. 
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SMI - SPF MAIN INITIALIZATION ROUTINE SMI 


PURPOSE: 
SMI PERFORMS SPF INITIALIZATION. INCLUDED IS THE ALLOCATION AND 
OPENING OF SPFMENUS, SPFMSGS, SPFPROCS, AND SPFPARMS. THE PARMS 
INITIALIZATION SUBROUTINE CCIPARMS) IS CALLED TO READ THE USER 
PARMS RECORD FROM THE PARMS DATA SET OR CREATED A FIRST-TIME SPF 
USER PARMS RECORD. SMI CONTAINS THE STAE EXIT ROUTINE THAT IS 
ENTERED IF THE SPF MAIN TASK ABENDS. 

INVOKED WITH: 


CALL TO SMI CFROM SMD) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE (TLDO) 


RETURN CODE: 
0 - SPF IS SUCCESSFULLY INITIALIZED. 
>0 - SMI ENCOUNTERED AN ERROR DURING INITIALIZATION. 


NOTES: 
NONE. 
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SML - SPF MAIN LINE I-0 INTERFACE ROUTINE SML 


PURPOSE: 
SML IS CALLED BY SMC WHENEVER A PROCESSOR TASK IS ABOUT TO INVOKE A 
PROGRAM THAT MIGHT PERFORM STANDARD TSO LINE I7/0. 

INVOKED WITH: 
CALL TO SML CFROM SMC) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE C(TLDO) 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


THE PROCESSOR TASK SIGNALS SMC BY POSTING THE DISPLAY REQUEST ECB 
CTLDDRECB) WITH A SPECIAL CODE. SML POSITIONS THE CURSOR AND 
CLEARS THE SCREEN FROM THE CURSOR POSITION TO THE BOTTOM. SML THEN 
WAITS FOR THE NEXT DISPLAY REQUEST, AFTER WHICH IT PASSES CONTROL 
BACK TO SMC WHICH PROCESS THE DISPLAY REQUEST ALONG WITH A COMPLETE 
REDISPLAY OF THE SCREEN. 
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SOP - SPF OUTPUT PARMS EXIT ROUTINE. sop 


PURPOSE: x 


SOP IS AN EXIT ROUTINE THAT CAN EXAMINE AND MODIFY SPF PARAMETERS 
BEFORE THEY ARE WRITTEN TO THE PARMS DATA SET. IT ALSO MOVES 
SELECTED PARAMETERS FROM THE TSV TO THE TKV. THE PASSWORD VALUE IS 
BLANKED AND "RACF™® VALUES ON JCL JOB CARDS ARE SET TO QUESTION 
MARKS. 


INVOKED WITH: 
CALL TO SOP CFROM CUPARMS) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


SOP IS DESIGNED TO PROVIDE AN EASY INTERFACE FOR INSTALLATIONS 

THAT REQUIRE MODIFICATION TO SPF USER PARMS ON OUTPUT. IT PROVIDES 
AN INTERFACE TO CKVGET AND CKVPUT TO RETRIEVE AND THEN STORE BACK 
SELECTED USER PARAMETERS. IT ALSO PROVIDES ADDRESSABILITY TO 

SOME COMMON SPF TABLES. BY MODIFYING, ASSEMBLING, AND LINK EDITING 
SOP AN INSTALLATION CAN PERFORM PARAMETER VALIDATION/MODIFICATION 
AND STILL MAINTAIN A CLEAN INTERFACE WITH OTHER SPF MODULES. 


SOP IS LINK EDITED INTO SPFSUBS. 

SOP ACTUALLY MODIFIES A COPY OF THE PARAMETERS. THIS COPY IS 
WRITTEN TO THE PARMS DATA SET, BUT THE ORIGINAL CUNMODIFIED) DATA 
CONTINUES TO BE USED DURING THE CURRENT SPF SESSION. 


A SIMILAR TYPE OF EXIT IS PROVIDED WHEN SPF PARAMTERS ARE READ FROM 
THE PARMS DATA SET. SEE THE DESCRIPTION OF OBJECT MODULE SIP. 


ONLY THE "RACF™ “PASSWORD” VALUE IS SET TO QUESTION MARKS. A 


SUPER-ZAPPABLE SWITCH BYTE IS PROVIDED TO HAVE "USER" AND "GROUP" 
VALUES ALSO SET TO QUESTION MARKS. REFER TO THE PROGRAM LISTINGS. 
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SPC - SPF PARMS CONVERSION ROUTINE SPC 


PURPOSE: 
SPC CONVERTS A PARMS RECORD FROM THE SPF VERSION 2.1 FORMAT INTO THE 
SPF VERSION 2.2 FORMAT. CIPARMS LINKS TO SPC WHEN IT RECOGNIZES 
THAT THE PARMS RECORD WHICH HAS BEEN READ IS A VERSION 2.1 RECORD. 
INVOKED WITH: 


LINK TO SPFSPC CFROM CIPARMS) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE (TLDO) 
2. TKV <TKV> INPUT DEFAULT TKV FOR VERSION 2.2 
3. TKV2 CHARC) INPUT SPF PARMS DATA SET RECORD 
WHERE 

TKV2 - IS THE VERSION 2.1 PARMS RECORD. 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


IN CREATING THE TKV, DATA IS TAKEN FROM THE VERSION 2.1 TSV. 

HOWEVER, NOT ALL OF THE DATA THAT MIGHT BE USED IS COPIED OVER TO 

WER hse TKV, SINCE SOME OF IT MIGHT BE INCONSISTENT WITH SPF 
ERSION 2.2. 
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SPF - SPF DRIVER ROUTINE SPF 


PURPOSE: 
SPF IS THE HIGHEST LEVEL ROUTINE IN THE SPF MAIN TASK. IT RECEIVES 
CONTROL FROM THE TSO TERMINAL MONITOR PROGRAM AND PASSES CONTROL TO 
THE SPF MAIN DRIVER ROUTINE (SMD). 

INVOKED WITH: 


ATTACH TO SPF (FROM TERMINAL MONITOR PROGRAM) 


CALLING SEQUENCE PARAMETERS: 


1. CBUF x INPUT THE TSO COMMAND BUFFER 

2. UPT x INPUT THE TSO USER PROFILE TABLE 

5S. PSCB x INPUT THE TSO PROTECTED STEP CONTROL 
BLOCK 

4. ECT ¥ INPUT THE TSO ENVIRONMENT CONTROL 
BLOCK 

WHERE 


THE FOUR PARAMETERS ARE THE STANDARD PARAMETERS THAT ARE PASSED 
TO ANY TSO COMMAND PROCESSOR. SEE "GUIDE TO WRITING A TERMINAL 
MONITOR OR A COMMAND PROCESSOR” FOR MORE INFORMATION. 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


SPF DETERMINES WHETHER OR NOT AN SPFLIB FILE HAS BEEN ALLOCATED. 
IF IT HAS, A DCB IS OPENED AND ITS ADDRESS IS USED IN LINKING 
TO SPFMAIN CWHICH IN TURN USES IT FOR LOADS AND AS A TASKLIB IN 
ATTACHING SPFPMD). IF THE SPFLIB FILE HAS NOT BEEN ALLOCATED, 
AN ADDRESS OF ZERO IS PASSED TO SPFMAIN. 
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SPFCALCP - SPF CALL COMMAND PROCESSOR ROUTINE SPFCALCP 


PURPOSE: 
SPFCALCP IS A COPY OF THE TSO CALL COMMAND PROCESSOR. IT IS INVOKED 


WHEN A CALL COMMAND 


INVOKED WITH: 
CALL TO SPFCALCP 


CALLING SEQUENCE PARAMETERS: 


1. CBUF x INPUT 
2. UPT x INPUT 
3. PSCB % INPUT 
4. ECT x INPUT 
5. TLD <TLD> INPUT 
WHERE 


IS TO BE EXECUTED UNDER SPF. 


THE TSO COMMAND BUFFER 

THE TSO USER PROFILE TABLE 
THE TSO PROTECTED STEP CONTROL 
BLOCK 


THE TSO ENVIRONMENT CONTROL TABLE 
LOGICAL DISPLAY TABLE 


THE FOUR PARAMETERS ARE THE STANDARD PARAMETERS THAT ARE PASSED 


TO ANY TSO COMMAND PROCESSOR. 
MONITOR OR A COMMAND PROCESSOR" 


SEE "GUIDE TO WRITING A TERMINAL 


FOR MORE INFORMATION. THE LAST 


PROGRAM IS THE LOGICAL DISPLAY TABLE AND ALLOWS THE CALLED 
TO HAVE ACCESS TO ANY SPF TABLES. 


RETURN CODE: 
FROM THE CALLED PROGRAM. 


NOTES: 
SPFCALCP 


LONGER EXISTS IN MVS SYSTEMS. 


ONLY UNAUTHORIZED PROGRAMS MAY BE INVOKED VIA SPFCALCP BECAUSE SPF 
RUNS AS AN UNAUTHORIZED PROBLEM PROGRAM. 
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SPFSC93X - SVC S93 EXIT ROUTINE SPFSCS3X 


PURPOSE: 2 


SPFSC93X IS AN SVC 93 EXIT ROUTINE WHICH PROVIDES THE SPF/SESSION 
MANAGER INTERFACE. THIS INTERFACE ALLOWS SPF TO CONTROL WHEN SESSION 
MANAGER MODE IS ENTERED. 


INVOKED WITH: 
CALL TO SPFSC93X CFROM IKTTMPX1) 


CALLING SEQUENCE PARAMETERS: 


REGISTERS 0 AND 1 ARE THE SAME AS ENTRY TO SVC 93. 
REGISTERS 2 AND 10 ARE AVAILABLE FOR PROGRAM USE. 
ALL OTHER REGISTERS CONTAIN SESSION MANAGER DATA. 


RETURN CODE: 
-8 - REQUEST HAS NOT BEEN PROCESSED BY SPFSC93X. THE SESSION MANAGER 
SHOULD PROCESS IT. 
-4 - REQUEST HAS BEEN PROCESSED BY SPFSC93X. THE SESSION MANAGER 
SHOULD PASS THE -% RETURN CODE BACK TO SVC 94. 
0 - REQUEST HAS BEEN PROCESSED BY SPFSC93X. THE SESSION MANAGER 
SHOULD PASS THE 0 RETURN CODE BACK TO SVC 93. 


NOTES: 


SESSION MANAGER RELEASE 2 IS REQUIRED FOR THE SPF/SESSION MANAGER 
INTERFACE TO BE EFFECTIVE. 
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SPFSCS4X - SVC S4 EXIT ROUTINE SPFSCS4X 


PURPOSE: 
SPFSC94X IS AN SVC 94 EXIT ROUTINE WHICH PROVIDES THE SPF/SESSION 
MANAGER INTERFACE. THIS INTERFACE ALLOWS SPF TO CONTROL WHEN 
SESSION MANAGER MODE IS ENTERED. 

INVOKED WITH: 


CALL TO SPFSC94X CFROM IKTTMPX2) 


CALLING SEQUENCE PARAMETERS: 


REGISTERS 0 AND 1 ARE THE SAME AS ENTRY TO SVC 94. 
REGISTERS 6 AND 8 ARE AVAILABLE FOR PROGRAM USE. 
ALL OTHER REGISTERS CONTAIN SESSION MANAGER DATA. 


RETURN CODE: 


-8 - REQUEST HAS NOT BEEN PROCESSED BY SPFSC94X. THE SESSION MANAGER 
SHOULD PROCESS IT. | 

-4 - REQUEST HAS BEEN PROCESSED BY SPFSC94X. THE SESSION MANAGER 
SHOULD PASS THE -4 RETURN CODE BACK TO SVC 94. 

0 - REQUEST HAS BEEN PROCESSED BY SPFSC94X. THE SESSION MANAGER 
SHOULD PASS THE 0 RETURN CODE BACK TO SVG 94. 


NOTES: 


SESSION MANAGER RELEASE 2 IS REQUIRED FOR THE SPF/SESSION MANAGER 
INTERFACE TO BE EFFECTIVE. 
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TCM - TABLE - COMMANDS-CLISTS TCH 


PURPOSE: 


TCM IS THE TABLE OF COMMANDS. IT CONTAINS A LIST OF COMMAND NAMES. 
THE COMMON ATTACH ROUTINE (CAT) LOOKS UP IN THIS TABLE THE NAME OF 
ANY PROCESSOR OR CLIST THAT IS TO BE EXECUTED. 


REFERENCED VIA: 
TLD CTLDDCLS - TLDTCMP). 


NOTES: 


EACH NAME IN THE TCM IS IDENTIFIED AS A COMMAND PROCEDURE CCLIST), A 
COMMAND PROCESSOR, AN INVALID COMMAND, OR A BLDL REQUIRED COMMAND. 
IN THE CASE OF A BLDL REQUIRED COMMAND, A BLDL IS PERFORMED (WITH 
DCB=0) AND IF THE COMMAND IS FOUND IT IS ASSUMED TO BE A COMMAND 
PROCESSOR. IF IT IS NOT FOUND WITH A BLDL, IT IS ASSUMED TO BE A 
CLIST. THE LAST ENTRY IN THE TCM SPECIFIES HOW COMMANDS NOT IN 

THE TABLE SHOULD BE HANDL.*v 


THe TCM OBJECT MODULE IS IN REENTRANT LOAD MODULE SPFTCM, WHICH 
IS LOADED BY OBJECT MODULE SMD. 
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TKY - TABLE - KEYWORD VALUES TKY 


PURPOSE: 
TKV IS THE TABLE OF KEYWORD/VALUES. THIS OBJECT MODULE IS THE USED 
TO CREATE FOR A NEW USER THE IN-MEMORY TKV CONTROL BLOCK THAT IS USED 


BY SPF TO SAVE A USERS “REMEMBERED” PARAMETERS. THE IN-MEMORY TKV IS 
SAVED FROM SESSION TO SESSION IN THE SPFPARMS DATASET. 


REFERENCED VIA: 
VCON CCIPTKVCP IN CIPARMS OBJECT MODULE) 


NOTES: 


FOR FURTHER INFORMATION ABOUT THE TKV SEE THE DATA AREAS SECTION OF 
THIS MANUAL. 


THE TKV OBJECT MODULE IS LINK EDITED TO THE SPFMAIN LOAD MODULE. 
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TKN 


PUR 


REF 


NOT 


250 


- TABLE - KEYNORDS TKN 


POSE: 

TKW IS THE TABLE OF KEYWORDS TABLES. IT CONTAINS POINTERS TO THE 
THREE KEYWORD TABLES (FOR SPF SYSTEM WIDE KEYWORDS, FOR EDIT AND 
BROWSE PRIMARY COMMAND KEYWORDS, AND FOR EDIT LINE COMMAND KEYWORDS). 
ERENCED VIA: 


TLD CTLDDCLS - TLDTKWP). 


ES: 


KEYWORDS ARE 1 TO 8 CHARACTER NAMES. ASSOCIATED WITH EACH KEYWORD 
IS ITS LENGTH, AND AN INTERNAL ONE BYTE CODE.: 


THE USE OF KEYWORD TABLES ENABLES MORE EFFICIENT CODE (SINCE ONLY 
A SINGLE BYTE NEEDS TO BE REFERENCED IN CHECKING COMMANDS AND 
PARAMETERS, AND IT ALLOWS ALIAS NAMES SINCE TWO ENTRIES IN THE 
TABLE CAN HAVE THE SAME INTERNAL CODE. 


THE NUMBER OF KEYWORD ENTRIES IS LIMITED TO 255. 
CALLED INTERNAL PROCEDURES ARE USED TO REFERENCE INFROMATION IN THE 
KEYWORD TABLES. 
"SYSCODE” IS USED TO RETRIEVE A CODE, IF A KEYWORD IS KNOWN. 
"SYSWORD” IS USED TO RETRIEVE A KEYWORD, IF A CODE IS KNOWN. 


THE TKW OBJECT MODULE IS LINK EDITED TO THE SPFMAIN LOAD MODULE. 
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TRT - TABLE - STATIC TRANSLATE TABLES TRT 


PURPOSE: 


TRT IS A TABLE OF STATIC TRANSLATE TABLES. 


REFERENCED VIA: 


INDIVIDUAL TABLES IN TRT ARE ADDRESSABLE FROM THE TCT WHICH IN 
TURN IS ADDRESSABLE FROM THE TLD. CTLDDCLS - TLDTCTP) 


NOTES: 


THE TABLES THAT MAKE UP THE TRT ARE: 


TRTLOC 
TRTIATT - 
TRTAID - 


THE TRT OBJECT 


SCREEN LOC TRANS TABLE 
ATTR BYTE TRANS TABLE 
AID TRANS TABLE 


MODULE IS LINK EDITED TO THE SPFMAIN LOAD MODULE. 
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TSC - TABLE - SUBROUTINE COMMON Tse 


PURPOSE: 
THE TSC OBJECT MODULE IS USED TO BUILD THE TSC CONTROL BLOCKS IN 


DYNAMIC STORAGE, WHICH IN TURN ARE USED TO ADDRESS SPF COMMON 
SUBROUTINES. 


REFERENCED VIA: 
TSI CTSIDCLS - TSITSCP) 


NOTES: 


EACH LOGICAL SCREEN HAS A TSC WHICH IS BUILT IN GETMAINED STORAGE 
FROM THE TSC OBJECT MODULE BY OBJECT MODULE PMD. THE TSC CONTROL 
Depy cee DYNAMIC STORAGE IS REFERENCED BY THE PROCESSOR TASKS VIA 


SEE THE DATA AREAS SECTION OF THIS MANUAL FOR FURTHER INFORMATION 
ABOUT THE TSC CONTROL BLOCK. 


THE TSC OBJECT MODULE IS LOCATED IN THE SPFSUBS LOAD MODULE WHICH 
IS LOADED BY OBJECT MODULE SMD. 
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TSI - TABLE - SPF INTERFACES TSI 


PURPOSE: 


ee OBJECT MODULE IS A SKELETON FOR THE PRIMARY SPF CONTROL 
BLOCKS. 


REFERENCED VIA: 
TLD CTLDDCLS - TLDTSIP) 


NOTES: 


FOLLOWING IS A LIST OF THE CONTROL BLOCKS CONTAINED WITHIN THE 
TSI OBJECT MODULE: 


DCB - DATA CONTROL BLOCKS FOR THE FOLLOWING DATASETS: 

SPFMENUS 

SPFMSGS 

SPFPARMS 

SPFPROCS 

SPFLOG 

SPFLIST 

SPFEDIT BACKUP DATASET 1 

SPFEDIT BACKUP DATASET 2 


TCT = CONTROLLER TABLES ARRAY 
TDS - DATA SET TABLE 
TFD = FILE DEFINITION TABLES FOR ALL DATASETS LISTED UNDER DCB 
TFI - FIND MEMBER TABLES FOR THE FOLLOWING DATASETS: 
SPFMSGS 
SPFPROCS 
SPFMENUS 
TLDO LOGICAL DISPLAY TABLE CCONTROLLER) 
TLDI LOGICAL DISPLAY TABLE CPROCESSOR TASK 1) 
TLD2 LOGICAL DISPLAY TABLE CPROCESSOR TASK 2) 


TPD - PHYSICAL DISPLAY TABLE 


TSV SPF VARIABLES TABLE 
TSI SPF INTERFACE TABLE 
TXC SPF EXITS CONTROL TABLE (SVC 93 AND 94 EXIT ROUTINES) 


THE TSI OBJECT MODULE ALSO CONTAINS THE SPF PROLOG AND EPILOG CODE 
INVOKED VIA THE SPFPROC AND SPFRETRN MACROS. 


THE TSI OBJECT MODULE IS LOCATED IN LOAD MODULE SPFTBLS, WHICH IS THE 


ap NON-~REENTERABLE MODULE IN SPF. IT IS LOADED BY OBJECT MODULE 
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TT1 - TABLE - 3277 DEPENDENT TABLES TTL 


PURPOSE: 
TT1 CONTAINS THE TERMINAL DEPENDENT TABLES FOR THE 327773275 
TERMINALS. 

REFERENCED VIA: 
INDIVIDUAL TABLES TT1 ARE ADDRESSABLE FROM THE TCT WHICH IN 
TURN IS ADDRESSABLE FROM THE TLD. (TLDDCLS ~- TLDTCTP) 

NOTES: 


THE TABLES THAT MAKE UP TT1 ARE: 
TT1LUPP UPPER CASE TRANS TABLE 


TT1LOW - LOWER CASE TRANS TABLE 

TT1IVAL - VALID OUTPUT CHARACTER TRANS TABLE 

TTIBTO - BROWSE INVALID CHARACTER TRANS TABLE 

TTLETO - EDIT INVALID CHARACTER TRANS TABLE 

TT1GSC - EDIT GENERIC STRING CHARACTER CODE TRANS TABLE 
TT1GSM - EDIT GENERIC STRING MASTER TRANS TABLE 

TT1GSS - EDIT GENERIC STRING SPECIAL CHARACTER TRANS TABLE 


THE TTL OBJECT MODULE IS IN REENTRANT LOAD MODULE SPF3277, WHICH 
TIS LOADED BY OBJECT MODULE SMI OR SMC. 
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ao 


TTe - TABLE - 3278 DEPENDENT TABLES TT2 


PURPOSE: 


TT2 CONTAINS THE TERMINAL DEPENDENT TABLES FOR THE 327873276 
TERMINALS. 


REFERENCED VIA: 


INDIVIDUAL TABLES TT2 ARE ADDRESSABLE FROM THE TCT WHICH IN 
TURN IS ADDRESSABLE FROM THE TLD. (TLDDCLS - TLDTCTP) 


NOTES: 


THE TABLES THAT MAKE UP TT2 ARE: 
TT2UPP - UPPER CASE TRANS TABLE 


TT2LOW - LOWER CASE TRANS TABLE 

TT2VAL - VALID OUTPUT CHARACTER TRANS TABLE 

TT2BTO - BROWSE INVALID CHARACTER TRANS TABLE 

TT2ETO - EDIT INVALID CHARACTER TRANS TABLE 

TT2GSC - EDIT GENERIC STRING CHARACTER CODE TRANS TABLE 
TT2GSM - EDIT GENERIC STRING MASTER TRANS TABLE 

TT2GSS - EDIT GENERIC STRING SPECIAL CHARACTER TRANS TABLE 


THE TT2 OBJECT MODULE IS IN REENTRANT LOAD MODULE SPF3278, WHICH 
IS LOADED BY OBJECT MODULE SMI OR SNC. 
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| TT3 - TABLE - 3278 CANADIANC FRENCH) DEPENDENT TABLES TTS 


| PURPOSE: 

| TTS CONTAINS THE TERMINAL DEPENDENT TABLES FOR THE 3278/3276 
CANADIANCFRENCH) TERMINALS. 

| REFERENCED VIA: 


| INDIVIDUAL TABLES TT3 ARE ADDRESSABLE FROM THE TCT WHICH IN 
TURN IS ADDRESSABLE FROM THE TLD. C(TLDDCLS - TLDTCTP) 


| NOTES: 
THE TABLES THAT MAKE UP TTS ARE: 
TT3SUPP - UPPER CASE TRANS TABLE 
TT3LOW ~- LOWER CASE TRANS TABLE 
TTSVAL - VALID OUTPUT CHARACTER TRANS TABLE 
TT3BTO - BROWSE INVALID CHARACTER TRANS TABLE 
TTSETO - EDIT INVALID CHARACTER TRANS TABLE 
TT3GSC - EDIT GENERIC STRING CHARACTER CODE TRANS TABLE 
TT3GSM - EDIT GENERIC STRING MASTER TRANS TABLE 
TT3GSS - EDIT GENERIC STRING SPECIAL CHARACTER TRANS TABLE 


THE TT3 OBJECT MODULE IS IN REENTRANT LOAD MODULE SPF3278C, WHICH 
IS LOADED BY OBJECT MODULE SMI OR SMC. 
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TUT - TUTORIAL: PROCESSOR ROUTINE TUT 


PURPOSE: 
TUT IS INVOKED WHEN OPTION 7 IS SELECTED FROM THE PRIMARY OPTION 
MENU. IT DISPLAYS EACH TUTORIAL PAGE, USING THE MENU HANDLER 
(MHA), AND DETERMINES THE NEXT PAGE TO BE DISPLAYED. TUT IS ALSO 
INVOKED WHEN THE HELP PF KEY IS PRESSED AFTER A LONG MESSAGE IS 
DISPLAYED ON THE SECOND LINE. 

INVOKED WITH: 


LINK TO SPFTUTOR CFROM PMD OR CHELP) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. PARM CHAR(8) INPUT MENU NAME 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


TUTORIAL PAGE SEQUENCES ARE DEFINED IN THE MENU DEFINITIONS FOR THE 
PAGES THEMSELVES BY A MOTHER-SISTER-DAUGHTER RELATIONSHIP. THIS 
PROGRAM SELECTS THE APPROPRIATE PAGE (MOTHER, SISTER, DAUGHTER OR 
SPECIAL REQUEST) TO BE DISPLAYED BASED ON THESE PARAMETERS, USER 
REQUEST, AND PREVIOUS PAGE FLOW. 


THE MENU NAME "T* CTUTORIAL INTRODUCTION) IS PASSED TO TUT VIA THE 
SECOND PARAMETER OF THE PRIMARY OPTION MENU WHEN INVOKED FROM PMD. 
THE TLDHELP FIELD IS PASSED TO TUT WHEN INVOKED FROM CHELP. THIS 
FACILITY ALLOWS TUT TO BE USED AS A GENERAL PURPOSE DISPLAY PROGRAM 
FOR A SET OF TUTORIAL TYPE MENUS. 
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UAA - ALLOCATE NEW DATA SET ROUTINE UAA 


PURPOSE: 
UAA ALLOCATES A NEW DATA SET (DATA SET UTILITY OPTION). 


INVOKED WITH: 
CALL TO UAA CFRUM UDA) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 
3. COMM <UDACOMM> IN/OUT UDA COMMON AREA 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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uAaC - CATALOG OR UNCATALOG DATA SET ROUTINE UAC 


PURPOSE: 
UAC CATALOGS OR UNCATALOGS A DATA SET (DATA SET UTILITY OPTION). 


INVOKED WITH: 
CALL TO UAC CFROM UDA) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 
3. COMM <UDACOMM> IN/OUT UDA COMMON AREA 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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UAD - DELETE DATA SET ROUTINE UAaD 


PURPOSE: 
UAD DELETES A DATA SET (DATA SET UTILITY OPTION). 


INVOKED WITH: 
CALL TO UAD (FROM UDA) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. FD <TFD> IN/OUT FILE DEFINITION TABLE 
3. COMM <UDACOMM> IN/OUT UDA COMMON AREA 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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oe omncl ¢ 


UAI - DISPLAY DATA SET INFORMATION ROUTINE UAI 


PURPOSE: 
UAI DISPLAYS DATA SET INFORMATION CDATA SET UTILITY OPTION). 


INVOKED WITH: 
CALL TO UAI CFROM UDA) 


CALLING SEQUENCE PARAMETERS: 


l. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. FD <TFD> IN/OUT FILE DEFINITION TABLE 
3. COMM <UDACOMM> IN/OUT UDA COMMON AREA 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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UAR - RENAME DATA SET ROUTINE UAR 


PURPOSE: 
UAR RENAMES A DATA SET CDATA SET UTILITY OPTION). 


INVOKED WITH: 
CALL TO UAR CFROM UDA) 


CALLING SEQUENCE PARAMETERS: 


l. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 
3. COMM <UDACOMM> IN/OUT UDA COMMON AREA 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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t 
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UCA = CATALOG MANAGEMENT DRIVER ROUTINE UcA 


PURPOSE: 
UCA IS INVOKED WHEN THE USER SELECTS OPTION 4 FROM THE UTILITY 
SELECTION MENU COR OPTION 3.4 FROM THE PRIMARY OPTION MENU). ITS 
ONLY FUNCTION IS TO DETERMINE WHETHER THE OPERATING SYSTEM IS SVS 


OR MVS, AND TO LINK TO THE APPROPRIATE CATALOG MANAGEMENT ROUTINE 
CSPFUC1] OR SPFUC2). 


INVOKED WITH: 
LINK TO SPFUCA CFROM UTIL OR PMD) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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uCcl - SUS CATALOG MANAGEMENT ROUTINE ~ s uci 
PURPOSE: 

gr a CATALOG MANAGEMENT REQUESTS IF THE OPERATING SYSTEM 
INVOKED WITH: 


LINK TO SPFUCL CFROM UCA) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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UCce - MVS CATALOG MANAGEMENT ROUTINE uc2 
PURPOSE: 

i CATALOG MANAGEMENT REQUESTS IF THE OPERATING SYSTEM 
INVOKED WITH: 


LINK TO SPFUC2 CFROM UCA) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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UDA - LIBRARY AND DATA SET UTILITY DRIVER ROUTINE UDA 


PURPOSE: 
UDA IS INVOKED WHEN THE USER SELECTS OPTION 1 OR 2 FROM THE UTILITY 
SELECTION MENU COR OPTION 3.1 OR 3.2 FROM THE PRIMARY OPTION MENU). 
IT DISPLAYS THE LIBRARY UTILITY MENU OR DATA SET UTILITY MENU, 
ALLOCATES THE SPECIFIED DATA SET, AND CALLS ONE OF THE FOLLOWING 
PROGRAMS TO PERFORM THE DESIRED FUNCTION: UAA, UAC, UAD, UAI, UAR 
UDM, UDP, UDX, OR UDZ. 

INVOKED WITH: 


LINK TO SPFUDA CFROM UTIL OR PMD) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. PARM CHARC8) INPUT MENU NAME 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


THE MENU NAME "UDA1L™ FOR THE LIBRARY UTILITIES OR "UDA2" FOR THE 
DATA SET UTILITIES IS PASSED TO THIS PROGRAM FROM UTIL VIA THE 
SECOND PARAMETER OF THE "UTIL™ MENU COR FROM PMD VIA THE SECOND 
PARAMETER OF THE PRIMARY OPTION MENU). THIS ALLOWS UDA TO BE USED 
AS A GENERAL PURPOSE DRIVER FOR UTILITIES. THE SELECTIONS ON 

"UDA1L™ AND "UDA2™ COULD BE REARRANGED, E.G. ALL THE SELECTIONS COULD 
BE PLACED ON ONE MENU OR BE REARRANGED ON THREE MENUS. 
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UDM - LIBRARY UTILITY MEMBER LIST ROUTINE UDM 


PURPOSE: 
UDM PROCESSES MEMBER LIST REQUESTS (LIBRARY UTILITY OPTION). IT 
CALLS CML TO DISPLAY THE MEMBER LIST, AND PASSES THE ADDRESS OF 
UDMS CINVOKED VIA CML TO PROCESS EACH MEMBER SELECTED FROM THE 


LIST). UDM ALSO HANDLES REQUESTS TO PRINT, RENAME, DELETE, OR 
BROWSE A SINGLE MEMBER. IN THIS CASE, IT CALLS UDMS DIRECTLY. 


INVOKED WITH: 
CALL TO UDM CFROM UDA) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. FD <TFD> IN/OUT FILE DEFINITION TABLE 
3. COMM <UDACOMM> IN/OUT UDA COMMON AREA 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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UDMS - LIBRARY UTILITY MEMBER SELECT ROUTINE UDMS 


PURPOSE: 
UDMS IS CALLED BY CML (ON BEHALF OF UDM) OR DIRECTLY BY UDM. 
IT IS A CML SELECTION ROUTINE USED TO PROCESS PRINT, DELETE, RENAME, 
AND BROWSE MEMBER REQUESTS. 

INVOKED WITH: 


CALL TO UDMS (FROM UDM OR CML) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 

2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 

3. CODE BIT(32) INPUT CML CONTROL BIT CODES 

4. NAME CHAR(8) IN/OUT CML MEMBER NAME 

5. UDMSPARM <UDACOMM> IN/OUT COMMON PARAMETERS FROM UDM 
6. SCODE CHAR(C1) IN/OUT SELECT CODE 

7. MEMBER CHAR(8) INPUT SELECTED MEMBER NAME 

8. RENAME CHAR(8) IN/OUT SELECTED NEW MEMBER NAME 
9. FLAGS BIT(8) IN/OUT FLAGS 

WHERE 


UDMSPARM IS THE UDM/UDMS COMMON PARAMETER AREA CUDACOMM) WHICH 
IS PASSED TO UDMS DIRECTLY FROM UDM OR INDIRECTLY 
THROUGH CML. 
RETURN CODE: 


0 - ALWAYS. 
NOTES: 


SEE CML OBJECT MODULE DESCRIPTION FOR FURTHER EXPLANATION OF 
PARAMETERS. 
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UDP - PRINT DATA SET ROUTINE UDP 


PURPOSE: 
UDP PROCESSES PRINT DATA SET REQUESTS C(CLIBRARY UTILITY OPTION). 


INVOKED WITH: 
CALL TO UDP CFROM UDA) 


CALLING SEQUENCE PARAMETERS: 


I. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 
3. COMM <UDACOMM> IN/OUT UDA COMMON AREA 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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UDX - PRINT INDEX ROUTINE UDX 


PURPOSE: 
UDX PROCESSES PRINT INDEX LISTING REQUESTS (LIBRARY UTILITY OPTION). 


INVOKED WITH: 
CALL TO UDX CFROM UDA AND UDP) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. FD <TFD> IN/OUT FILE DEFINITION TABLE 
3. COMM <UDACOMM> IN/OUT UDA COMMON AREA 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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UDZ - COMPRESS DATA SET ROUTINE uDZ 
PURPOSE: 

UDZ PROCESSES PDS COMPRESS REQUESTS CLIBRARY UTILITY OPTION). 

THE IBM UTILITY "IEBCOPY' IS ATTACHED TO ACCOMPLISH THE COMPRESS. 


INVOKED WITH: 
CALL TO UDZ (FROM UDA) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. FD <TFD> IN/OUT FILE DEFINITION TABLE 
3. COMM <UDACOMM> IN/OUT UDA COMMON AREA 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


THE LOAD MODULE NAME THAT IS ATTACHED TO PERFORM THE COMPRESS IS 
TAKEN FROM THE *UDA1L* MENU. IF THE NAME IS BLANK CAS DISTRIBUTED), 
"IEBCOPY' IS USED. SINCE 'IEBCOBY' ABENDS UNDER MVS (DUE TO THE 
NONAUTHORIZED STATE OF SPF), THIS NAME MAY BE CHANGED TO A COMPRESS 
PROGRAM THAT DOES NOT REQUIRE AUTHORIZATION. REFER TO “FOREGROUND 
a PROCEDURES UNDER MVS" IN THE INSTALLATION AND CUSTOMIZATION 
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UHC - HARDCOPY UTILITY ROUTINE UHC 


PURPOSE: 
UHC IS INVOKED WHEN THE USER SELECTS OPTION 6 FROM THE UTILITY 
SELECTION MENU COR OPTION 3.6 FROM THE PRIMARY OPTION MENU). 
IT PRINTS OR PUNCHES SPECIFIED DATA SETS VIA A BACKGROUND JOB, OR 
PRINTS DATA SETS VIA “DSPRINT". 

INVOKED WITH: 


LINK TO SPFUHC CFROM UTIL OR PMD) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 


272 SPF/TSO PROGRAM LOGIC MANUAL LICENSED MATERIAL - PROPERTY OF IBM 


Fe aaa 


UNC - MOVE-COPY UTILITY ROUTINE UNC 


PURPOSE: 
UMC IS INVOKED WHEN THE USER SELECTS OPTION 3 FROM THE UTILITY 
SELECTION MENU (OR OPTION 3.3 FROM THE PRIMARY OPTION MENU). IT 
DISPLAYS THE MOVE/COPY UTILITY MENUS, ALLOCATES THE SPECIFIED DATA 
SETS, AND OPENS THE "FROM™ DATA SET FOR INPUT. 
UMC CALLS SUBROUTINE UMCS TO PROCESS EACH MEMBER IN THE “FROM™ DATA 
SET. IF A MEMBER LIST WAS REQUESTED, UMC CALLS CML AND PASSES THE 
ADDRESS OF UMCS (TO BE INVOKED VIA CML). UMC ALSO CALLS UMCS TO 
HANDLE A SEQUENTIAL DATA SET. 

INVOKED WITH: 


LINK TO SPFUMC CFROM UTIL OR PMD) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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UNCS - MOVE-COPY UTILITY MEMBER SELECT ROUTINE UMCS 


PURPOSE: 
UMCS IS CALLED BY CML CON BEHALF OF UMC) OR DIRECTLY BY UMC. UMCS IS 
A CML SELECTION ROUTINE USED TO COPY EACH MEMBER COR AN ENTIRE 
SEQUENTIAL DATA SET) FROM ONE DATA SET TO ANOTHER. 

INVOKED WITH: 


CALL TO UMCS (FROM UMC OR CML) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 

2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 

3. CODE BIT(32) INPUT CML CONTROL BIT CODES 

4. NAME CHAR(8) IN/OUT CML MEMBER NAME 

5. UMCSPARM x IN/OUT COMMON PARAMETERS FROM UMC 
6. SCODE CHARC1) IN/OUT SELECT CODE 

7. MEMBER CHAR(8) INPUT SELECTED MEMBER NAME 

8. RENAME CHAR(8) IN/OUT SELECTED NEW MEMBER NAME 
9. FLAGS BIT(8) IN/OUT FLAGS 

WHERE 


UMCSPARM IS THE UMC/UMCS COMMON PARAMETER AREA CUMCCOMM) WHICH 
IS PASSED TO UMCS DIRECTLY FROM UMC OR INDIRECTLY 
THROUGH CML. 
RETURN CODE: 


0 - ALWAYS. 
NOTES: 


SEE CML OBJECT MODULE DESCRIPTION FOR FURTHER EXPLANATION OF 
PARAMETERS. 
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UOL - OUTLIST UTILITY ROUTINE UGL 


PURPOSE: 
UOL IS INVOKED WHEN THE USER SELECTS OPTION 8 FROM THE UTILITY 
SELECTION MENU COR OPTION 3.8 FROM THE PRIMARY OPTION MENU). 
IT PERFORMS THE OUTPUT LISTING UTILITY FUNCTIONS VIA THE TSO 
"OUTPUT™ COMMAND. 

INVOKED WITH: 


LINK TO SPFUOL (FROM UTIL OR PMD) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. PARM CHAR(8) INPUT MENU NAME 
WHERE 
PARM - IS THE NAME OF THE MENU THAT WILL BE DISPLAYED BY UOL. 


RETURN CODE: 
0 - ALWAYS 


NOTES: 
THE MENU NAME "UOLO1" IS PASSED TO UOL FROM UTIL VIA THE SECOND 


PARAMETER OF THE "UTIL" MENU OR FROM PMD VIA THE SECOND PARAMETER 
OF THE PRIMARY OPTION MENU. 
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URS - RESET STATISTICS UTILITY ROUTINE URS 


PURPOSE: 
URS IS INVOKED WHEN THE USER SELECTS OPTION 5 FROM THE UTILITY 
SELECTION MENU COR OPTION 3.5 FROM THE PRIMARY OPTION MENU). URS 
DISPLAYS THE RESET STATISTICS MENU, ALLOCATES THE SPECIFIED DATA 
SET, AND OPENS IT FOR INPUT. 
URS CALLS SUBROUTINE URSS TO PROCESS EACH MEMBER. IF A MEMBER LIST 
WAS REQUESTED, URS CALLS CML AND PASSES THE ADDRESS OF URSS (TO BE 
INVOKED VIA CML). 

INVOKED WITH: 


LINK TO SPFURS (FROM UTIL OR PMD) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
NONE. 
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URSS - RESET STATISTICS UTILITY MEMBER SELECT ROUTINE URSS 


PURPOSE: | 
URSS IS CALLED BY CML (ON BEHALF OF URS) OR DIRECTLY BY URS. 
IT IS A CML SELECTION ROUTINE USED TO UPDATE THE STATISTICS FOR 
A SINGLE MEMBER OF AN SPF LIBRARY DATA SET. 

INVOKED WITH: 


CALL TO URSS CFROM URS OR CML) 


CALLING SEQUENCE PARAMETERS: 


1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 

2. TFD <TFD> IN/OUT FILE DEFINITION TABLE 

3. CODE BITC32) INPUT CML CONTROL BIT CODES 

4. NAME CHAR(8) IN/OUT CML MEMBER NAME 

5. URSSPARM x IN/OUT COMMON PARAMETERS FROM URS 
6. SCODE CHAR(1) IN/OUT SELECT CODE 

7. MEMBER CHAR(8) INPUT SELECTED MEMBER NAME 

8. RENAME CHAR (8) IN/OUT SELECTED NEW MEMBER NAME 
9. FLAGS BIT(8) IN/OUT FLAGS 

WHERE 


URSSPARM IS THE URS/URSS COMMON PARAMETER AREA CURSSPARM) WHICH 
IS PASSED TO URSS DIRECTLY FROM URS OR INDIRECTLY 
THROUGH CML. 
RETURN CODE: 


0 - ALWAYS. 
NOTES: 


SEE CML OBJECT MODULE DESCRIPTION FOR FURTHER EXPLANATION OF 
PARAMETERS. 
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usc - SCRIPT/US UTILITY ROUTINE usc 


PURPOSE: 
USC IS INVOKED WHEN THE USER SELECTS OPTION 9 FROM THE UTILITY 
SELECTION MENU COR OPTION 3.9 FROM THE PRIMARY OPTION MENU). USC 
INTERFACES TO THE SCRIPT/VS PROGRAM PRODUCT. 
INVOKED WITH: 


LINK TO SPFUSC CFROM UTIL OR PMD) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. MENU CHARC8) INPUT SCRIPT SELECTION MENU NAME 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 
THE MENU NAME "SCRPTA” IS PASSED TO USC FROM UTIL VIA THE SECOND 


PARAMETER OF THE "UTIL™ MENU OR FROM PMD VIA THE SECOND PARAMETER 
OF THE PRIMARY OPTION MENU. 
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UTIL - UTILITY DRIVER ROUTINE UTIL 


PURPOSE: 
UTIL IS A GENERAL PURPOSE SELECTION MENU PROCESSOR. IT IS USED TO 
PROCESS THE OPTION 3 AND OPTION 4% SELECTION MENUS, AND CAN BE USED TO 
CREATE ADDITIONAL INSTALLATION SELECTION MENUS. THE PROGRAM DISPLAYS 


A SELECTION MENU, AND LINKS TO THE APPROPRIATE LOAD MODULE, BASED ON 
THE SUBOPTION SELECTED. 


INVOKED WITH: 
LINK TO SPFUTIL CFROM PMD) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 
2. PARM CHAR(C8) INPUT MENU NAME 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


UTIL CAN BE BYPASSED BY ENTERING A FULLY QUALIFIED SELECTION ON THE 
PRIMARY OPTION MENU CE.G. "3.1%, "4.5", ETC.). 


FOR FURTHER INFORMATION ABOUT USING UTIL FOR CUSTOM TAILORED 
SELECTION MENUS, SEE THE INSTALLATION AND CUSTOMIZATION GUIDE. 
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UVT - YVTOC UTILITY ROUTINE UVT 


PURPOSE: 


UVT IS INVOKED WHEN THE USER SELECTS OPTION 7 FROM THE UTILITY 
SELECTION MENU (OR OPTION 3.7 FROM THE PRIMARY OPTION MENU). UVT 
DISPLAYS OR PRINTS THE VTOC OF A DASD VOLUME. 


INVOKED WITH: 
LINK TO SPFUVT (FROM UTIL OR PMD) 


CALLING SEQUENCE PARAMETERS: 
1. TLD <TLD> INPUT LOGICAL DISPLAY TABLE 


RETURN CODE: 
0 - ALWAYS. 


NOTES: 


THERE ARE 3 PARAMETERS PASSED TO UVT FROM THE UVT MENU WHICH CONTROL 
THE CONSTRUCTION OF THE VTOC LIST AND SUSEQUENT PROCESSING TIME. 


1. DATA SET LIST SORT CODE - CHARC1) - "A™ FOR ALPHABETIC SORT. 
- "P™ FOR NO SORT. 

2. FORMAT CONTROL MENU - CHAR(8) - MENU NAME TO FORMAT LIST. 

3. DATA SET LIST CONTROL - CHARC1) - "Y™ FOR DATA SET LIST. 
"N" FOR NO DATA SET LIST. 


THE FORMAT CONTROL MENU PROVIDES THE DETAIL OF THE VTOC LIST. THE 
FIRST CHARACTER OF EACH LINE OF THIS MENU DESCRIBES ITS INTENDED USE 
BY UVT AS FOLLOWS: 

"I" —- INFORMATION SECTION BEFORE THE DATA SET LIST. 

"EW ~ TRAILER SECTION AFTER THE DATA SET LIST. 

"NM" - MESSAGE MODEL USED TO CONSTRUCT EACH DATA SET LINE. 

RULES: 

- THERE MUST BE AT LEAST 1 LINE AND NO MORE THAN 24. 

- THE "I" AND "E® TYPE LINES ARE SIMILAR EXCEPT FOR THEIR 
LOCATION IN THE LIST. THEY CAN BE MODIFIED ACCORDING TO MENU 
PROCESSING RULES. THE VARIABLES CAN BE PLACED ON ANY OF THESE 
LINES. IF THERE ARE NO "I" OR “"E™ TYPE LINES THEN THE 
CORRESPONDING SECTION IS NOT INCLUDED IN THE LIST. 

- A SINGLE "MN" TYPE LINE IS REQUIRED. THIS LINE CAN BE MODIFIED 
ACCORDING TO MESSAGE PROCESSING RULES. 

THE DISTRIBUTED VERSION OF THE FORMAT CONTROL MENU IS "UVTI". THE 
FIRST LINE IN THIS MENU IS A "FIELDS" STATEMENT TO ALLOW PERCENT 
SIGNS IN THE MENU. 
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THIS SECTION CONTAINS LISTINGS AND CROSS REFERENCE LISTINGS OF SPF LOAD 
MODULES, OBJECT MODULES, MENUS, MESSAGES AND EXTERNAL SYMBOLS. 


THE SECTION CONTAINS THE FOLLOWING LISTS: 


LOAD MODULES - WITH INCLUDED OBJECT MODULES 

OBJECT MODULES WITH INCLUDING LOAD MODULE 

OBJECT MODULES WITH SPF MENUS REFERENCED 

SPF MENUS WITH OBJECT MODULES REFERENCING 
OBJECT MODULES WITH SPF MESSAGES REFERENCED 

SPF MESSAGES WITH OBJECT MODULES REFERENCING 
OBJECT MODULES OTHER OBJECT MODULES REFERENCED 
OBJECT MODULES WITH OTHER OBJECT MODULES REFERENCING 
OBJECT MODULES WITH EXTERNAL SYMBOLS DEFINED 

OBJECT MODULES WITH EXTERNAL SYMBOLS REFERENCED 
OBJECT MODULES WITH SVC ROUTINES REFERENCED 

SVC ROUTINES WITH OBJECT MODULES REFERENCING 


(ittettt ft t tt 
= 
Lo | 
—_ 
= 
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SPF LOAD MODULES ARE LISTED ALPHABETICALLY. EACH LOAD MODULE NAME [5 
FOLLOWED BY THE NAME ITS OF ENTRY POINT, AND THE NAMES OF ALL OF THE 
OBJECT MODULES THAT ARE INCLUDED IN THE LOAD MODULE. 


LOAD ENTRY INCLUDED 

MODULE POINT OBJECT MODULES 

SPF SPF SPF 

SPFBRO BRO BRO 

SPFCALCP SPFCALCP SPFCALCP 

SPFEDIT EDD EDD 

SPFFOR FOR FOR 

SPFJOB JOB JOB 

SPFMAIN SMD CIPARMS SIP SMA SMC SMD SMI SML TRT TKV TKW 
SPFOPT OPT OPT 

SPFPMD PMD PFT PMD PRS 

SPFSCAN SCN sc 

SPFSPC SPC SPC 

SPFSUBS TSC BCD CAT CBC CBDSN CBF CBG CBR CBS CCB CCD CCP CCS 


CDA CDAIR CDATE CDC CDERR CDF CDG CDISPL CDO CDP CDT 
CERR CFI CHC CHELP CHPJ CHPL CIR CIV CJC CJF CJN 
CKVGET CKVPUT CLM CLOG CMB CML CMSG CPRINT CRELS 
CRESV CSB CSCROLL CSM CTA CTF CTGET CTPUT CTl CT2 
CUPARMS CVM CVSDE EBA EBE EBI EBR EBS EBX ECD ECR 
EDI EDO EFC EFR EFT EGN EGR EMC EML EMP EPC EPD EPF 
EPI EPO EPP EPR EPS EPX ERA ERC ERD ERF ERI ERN ERO 
ERR ERS ERX EST ETC ETS ETL MERR MHA SOP TSC 


SPFTBLS TSI TSI 
SPFTCM TCM TCM 
SPFTMENU MNT MNT 
SPFTSO PTC PTC 
SPFTUTOR TUT TUT 
SPFUCA UCA UCA 
SPFUCI UCl UCl 
SPFUC2 UC2 UC2 
SPFUDA UDA UAA UAC UAD UAI UDA UAR UDM UDMS UDP UDX UDZ 
SPFUHC UHC UHC 
SPFUMC UMC UMC UMCS 
SPFUOL YOL UOL 
SPFURS URS URS URSS 
SPFUSC USC USC 
SPFUTIL UTIL UTIL 
SPFUVT UVT UVT 
SPF3277 TT1 TT1 
SPF3278 TT2 TT2 
SPF3278C TT3 TT3 
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SPF OBJECT MODULES ARE LISTED ALPHABETICALLY. 


ODULE 


AD MODULE 


STING 


IS FOLLOWED BY THE NAME OF THE INCLUDING LOAD MODULE. 


OBJECT 
MODULE 


SPFSUBS 
SPFBRO 

SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFMAIN 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 


OBJECT 
MODULE 


LOAD 
MODULE 


SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFEDIT 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFSUBS 
SPFFOR 

SPFJOB 

SPFSUBS 
SPFSUBS 
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OBJECT 
MODULE 


SPFCALCP 
SPFSC93X 
SPFSC94X 
TCM 


EACH OBJECT MODULE NAME 


LOAD 
MODULE 
SPFTMENU 
SPFOPT 
SPFPMD 
SPFPMD 
SPFPMD 
SPFTSO 
SPFSCAN 
SPFMAIN 
SPFMAIN 


SPFCALCP 
IGC0009C 
TGC0009D 
SPFTCM 
SPFMAIN 
SPFMAIN 
SPFMAIN 
SPFSUBS 
SPFTBLS 
SPF3277 
SPF3278 
SPF3278C 
SPFTUTOR 
SPFUDA 
SPFUDA 
SPFUDA 
SPFUDA 
SPFUDA 
SPFUCA 
SPFUC1 
SPFUC2 
SPFUDA 
SPFUDA 
SPFUDA 
SPFUDA 
SPFUDA 
SPFUDA 
SPFUHC 
SPFUMC 
SPFUMC 
SPFUOL 
SPFURS 
SPFURS 
SPFUSC 
SPFUTIL 
SPFUVT 
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OBJE 


MODU MENU N 


SPF OBJECT MODULES WHICH USE SPF MENUS ARE LISTED ALPHABETICALLY. EACH 
OBJECT MODULE NAME IS FOLLOWED BY THE NAMES OF THE SPF MENUS WHICH IT 


USES. 
NAMES, 


OBJECT 
MODULE 


MENU NAMES FOLLOWED BY AN ASTERISK(¥) ARE EITHER CONSTRUCTED 
OR ARE NAMES THAT ARE PASSED TO THE SPECIFIED MODULE. 


SPF 

MENUS 

BROWSEOQ1] BROWSEO2 CMLO1B 

EDITBR EDITBRER 

EDITCRAL EDITCRA2 EDITCRA3 EDITRPL1 EDITRPL2 EDITRPL3 

Byer e EDITCPY2 EDITCPY3 EDITMOV1 EDITMOV2 EDITMOV3 

CMLOLE CMLOILEC EDITO2 

EDITO2 

Sob ones FORO2C%) FOROSC%) FOROS4C%) FORO5C%) FORO6C%) FORO7(%) 
* 

JOBAC%) JOBBC%) JOBERROR JOBO1C#) JOBO2ZC#) JOBO3SCH%) JOBO4(#) 

A aa JOBO6(%) 

M 

OPTOOC%) OPTOLC¥) OPTOLSMC¥) OPTOLCFC#) OPTO2C%) OPTOSAC) 

OPTOSBC%) OPTOSCC) 

T¢%} TERR THELP TINDEX TTUTOR 

PFTO1l PFTO2 PFTO3 

APRIOPT PMDPIER 

PRSTRT 


2B 
UDA1C#) UDA2ZC#) 
CMLO2 

UDMSB 

UHC UHCJ 

CMLO3 UMC] UMC2A UMC2B 

UOLB UOLCHC VOLCHCS VOLO1 UVOLO1S 

CMLO4 URS 

ncara CMLOLFC SCRERR SCRPRTD SCRPRTF SCRPTA SCRPTD SCRPTF 
FORAC®) UTIL(C#) 

UVT UVTB UVTI 
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MENUS / OBJECT MODULE LISTING 


SPF MENUS ARE LISTED ALPHABETICALLY. 


NAME OF THE OBJECT MODULECS) THAT USES IT. 
"T" ARE TUTORIAL MENUS AND ARE NOT INCLUDED IN THE 


APRIOPT 
BROWSEO1 
BRONSEO2 
CMLO1B 
CMLOIE 
CMLO1EC 
CMLO1F 
CMLO1FC 
CMLO2 
CMLO3 
CMLO4 
EDITBR 
EDITBRER 
EDITCPY1 
EDITCPY2 
EDITCPY3 
EDITCRAI1 
EDITCRA2 
EDITCRAS 
EDITMOVI 
EDITMOV2 
EDITMOVS 
EDITRPLI 
EDITRPL2 
EDITRPL3 
EDITO1 
EDITO2 
FORA 
FORO] 
FORO2 
FOROS 
FORO4 
FORO5 
FORO6 
FORO? 
FORO8 
JOBA 
JOBB 
JOBERROR 
JOBOO 
JOBOl 
JOBO2 
JOBOS 
JOBO4 
JOBO5 
JOBO06 
MNT 
OPTOO 
OPTOl 


OBJECT 


MODULECS) 


OPTO1SM 
OPTOICF 
OPTO2 
OPTO3A 
OPTO3B 
OPTO3C 
PFTO1 
PFTO2 
PFTO03 
PMDPIER 
PRSTRT 
PTC 
SCRERR 
SCRPRTD 
SCRPRTF 
SCRPTA 
SCRPTD 
SCRPTF 
SETUP 
UAA 
UADC 
UAT 
UAIPO 
UAIPOX 
UAIXX 
UAR 

UC] 
UC1B 
UC2 
UC2ZB 
UDA1 
UDA2 
UDMSB 
UHC 
UHCJ 
UMC1 
UMC2A 
UMC2B 
UOLB 
UOLCHC 
UOLCHCS 
UOLO1 
UOLO1S 
URS 
USCBRO 
UTIL 
UVT 
UVTB 
UVTI 
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EACH MENU NAME IS FOLLOWED BY THE 


OBJECT 
MODULECS) 


ALL MENUS THAT START WITH 


DIRECTORY 


285 


JE 


MESSAGE 


SPF OBJECT MODULES WHICH USE SPF MESSAGES ARE LISTED ALPHABETICALLY. 
EACH OBJECT MODULE NAME IS FOLLOWED BY THE NAMES OF THE SPF MESSAGES 


WHICH IT USES. 


OBJECT 
MODULE 


EFC 


EFR 


EFT 
EMC 


EMP 
EPC 


EPD 
EPF 


EPT 
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SPF 
MESSAGES 


B501 B502 
B514¢ B515 
BOO2 B003 
G061 G062 
G003 G004 
Bl02 B103 
B158 B159 
BO10 BOl13S 
G141 G142 
G155 G156 
G044 G080 
D002 DON03 
D014 DOLLS 
G084¢ GO085 
GO057 GO058 
G101 Gl02 
G113 G114 
U281 U282 
J023 J024 
P002 

G024¢ G030 
A002 A003 
5008 
$008 
E301 
E304 
E307 
E501 
E514 
E527 
E541 
E554 
E018 


E409 
E007 
El0d2 
E158 
E201 
E221 
E261 
E005 
E625 
E643 
E663 
E683 
E707 


E011 
E406 
GO3sl 
E003 
E041 
E053 
E036 
E017 


EQ71 
E572 
E594 


E303 
E305 
E308 
E502 
E515 
E528 
E542 
E555 
E019 


E414 
E008 
E103 
E159 
E202 
E222 
E262 
E600 
E626 
E646 
E664 
E684 
E708 


E013 
E407 


E004 
E042 
E054 
E037 
E031 


E560 
E573 
E595 
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Glll 
G133 


E512 
E525 
E538 
E552 


6018 


G053 
E156 
E169 
E2l2 
E258 


E621 
E641 
E661 


E681 
E705 


E404 
G019 


E051 
E577 
E570 
E592 
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OBJECT MODULE / MESSAGES LISTING (CONTINUED ) 


OBJECT SPF 
MODULE MESSAGES 


EPO E022 E023 E024 GOl2 G018 GN22 

EPR E016 E017 E028 £040 E049 E051 E052 £418 E700 E701 E702 E705 
E710 E711 GO010 

EPS E024 GO13 

EPX G040 

ERN E069 E318 

FOR FOOO F001 F002 FOO3 F004 F005 F006 FOO7 F009 FO1O FOl1 F012 


JOB J001 J00% JO06 JO07 J009 JO1O JO1l1l JO12 JO13 J014¢ JO15 J016 
J017 J018 J019 

MHA M001 M002 M003 M005 M006 M007 M008 M009 MO10 MO11l MOl2 M014 
M015 M016 M017 M018 M019 

MNT MOll 

OPT OC01l 0002 0003 O004 0006 0007 0008 0009 

PFT 0002 0003 P0002 P0200 P0021 PO022 P023 P024 P025 P026 P027 P028 
PO32 P0033 P034 PO035 P036 PO037 P0358 

PMD GO01l PO003 

PRS POl1 PO12 PO13 PO14 PO15 P016 PO17 

PTC GO070 GO71 GO72 G073 

SMA $011 $012 S013 $014 $015 

SMC $001 S002 S006 S007 

TUT G028 

UAA M003 U050 U051 U052 V053 U054 U055 U056 U058 U059 

UAC UO1l7 U130 V131 VU1l32 V133 V134 U135 U1356 U137 U138 U159 

UAD U020 U021 

UAI U049 

UAR U008 U010 UO12 VO1S UO14 VUO15 VUO16 VO17 VO18 VO23 VO24 UO25 

UCl GO02 U170 U1l71 U172 U173 V174 UVU175 V176 V177 V178 VU179 U18l 
Ul82 U183 U184 U185 U186 U187 U188 U139 

UC2 GOO2 U200 U201 U202 U203 U204 U205 U207 U208 U209 

UDA the G006 G007 GO15 G027 GO54 U000 UO02 UCO3 U006 U007 U008 

009 

UDM U004 U027 U028 U039 

UDMS Gl22 U002 U003 V026 U029 VO30 VO31 UO32 VO35 VO34 UOS5 U056 
U037 U038 U039 UO42 U148 U149 

UDP G069 U005 U043 U044 U045 U046 U047 U048 

UDX U040 U041 U049 

UDZ U00% U140 U141 U142 U143 U144 U146 

UHC G005 GO009 U091 U092 U093 UO94 UO9S5 VOS9I V1O00 YlO01 V103 UV105 
U106 U107 U160 U161 U162 U164 U16ES VU166 VU167 VU168 U169 

UMC GO08 GO18 U060 U061 U062 UN63 U064 UOES UNG7 VU068 UO6EI UO70 
eee UO72 UO73 UO74 U078 VUO7S UOSO UOSS UOSI V1IO VU113 V114 

10 
UMCS G018 GO019 G020 G031 G032 GO035 U063 U066 U068 UO75 UO76 UN77 


U078 U080 U081 UO82 UO83S VUOS4 VUO8S5 VUO8S VOS7 UOBS& V111 U1l1l2 


UOL U220 U221 U222 U223 U224 U225 U228 U229 

URS U120 Ul21 Ul27 U129 V230 U231 U233 

URSS G018 GO19 GO31 GO032 GO035 Ul22 VU1l23 VU1l24 VU1l25 VU126 U128 

USC GO018 GO21 G120 Gl121 Gl22 U241 U250 U251 U252 U253 U254 U260 
U261 U262 U263 U264¢ U265 U266 U267 U268 U263 VU270 U271 U272 
U282 U283 

UTIL Gool 

UVT ee U150 U1l51 U190 U1S1 U192 V193 VU194 U195 U196 V1I7 U19IB 
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MESSAG 1) s 


SPF MESSAGES ARE LISTED ALPHABETICALLY. EACH MESSAGE NAME IS FOLLOWED 
BY THE NAME OF THE OBJECT MODULECS) THAT USES IT. MODULE NAMES 
FOLLOWED BY AN ASTERISK(#%) CONSTRUCT THE MESSAGE NAME. 


SPF OBJECT SPF OBJECT SPF OBJECT 
MESSAGE MODULE MESSAGE MODULE MESSAGE MODULE 
A001 CTA DOO CDERR E038 EPD 
A002 CTA D002 CDERR E040 EPC 
A003 CTA D003 CDERR E040 EPR 
A004 CTA D004 CDERR E041 EPC 
A005 CTA D005 CDERR E042 EPC 
A006 CTA D006 CDERR E043 EPC 
A007 CTA D007 CDERR E044 EPC 
BOO0l BRO D008 CDERR E0465 EPC 
BOO02 BRO DOO9 CDERR E046 EPC 
BO003 BRO DO10 CDERR E047 EPC 
BO005 CBR Doll CDERR E048 EPC 
BO10 CBR DO12 CDERR E049 EPC 
BO13 CBR D013 CDERR E049 EPR 
BO14 CBR D014 CDERR E050 EPC 
BO15 CBR DOS CDERR E051 EPC 
BO016 CBR D016 CDERR E051 EPR 
BO17 CBR DO17 CDERR E052 EPC 
B018 CBR D018 CDERR E052 EPR 
BO19 CBR DO19 CDERR E053 EPC 
B1lOl CBF D020 CDERR E054 EPC 
B102 CBF DO21 CDERR E055 EPC 
B103 CBF D021 UDA E056 ECR 
B104 CBF D022 CDERR E058 ECR 
B105 CBF E000 EMP E059 ECR 
B106 CBF E002 EFR E059 EMC 
B151 CBF E003 EMP E060 EPI 
B152 CBF E004 EMP E064¢ EPF 
B153 CBF E005 EFR E065 EPF 
B15% CBF E006 EDO E066 EPF 
B155 CBF E007 EDO E067 EPF 
B156 CBF E008 EDO E068 EFT 
B15? CBF E009 EDO E069 ERN 
B158 CBF E010 EMC EQ71 EPI 
B159 CBF E011 EMC E076 EMC 
B1l61 CBF E012 ECR E080 EPC 
B1l6é2 CBF E013 EMC E081 EPCC%) 
B1l63 CBF E014 EMC E082 EPC 
B164% CBF E015 EDO E083 EPC(%) 
B165 CBF E016 EPF E084 EPC 
B166 CBF E016 EPR E085 EPCC() 
B167 CBF E017 EPF E086 EPC 
B500 BCD E017 EPR E101 EFC 
B501 BCDC) E018 ECR E102 EFC 
B502 BCDC) E019 ECR El03 EFC 
B503 BCD E021 EMC El104% EFC 
B504% BCDC) E022 EPO E105 EFC 
B505 BCDC) E023 EPO E106 EFC 
B506 BCD E024 EPO E150 EFC 
B507 BCD(%) E024 EPS El5l EFC 
B508 BCDC) E028 EMC E153 EFC 
B510 BCD E028 EMP E154 EFC 
B51l1 BCDC) E028 EPR E155 EFC 
B512 BCDC) E031 EPF E156 EFC 
B513 BCD E032 EPF E157 EFC 
B514 BCDC) E033 EPF E158 EFC 
B515 BCDC) E034 EPF E159 EFC 
B516 BCD E035 EPD El6l EFC 
B517 BCDC) E036 EPD E162 EFC 
B518 BCDC) E037 EPD El63 EFC 
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MESSAGES / OBJECT MODULE LISTING CCONTINUED ) 


SPF 
MESSAGE 


OBJECT. 
MODULE 


EFC 

EFCC) 
EFCC) 
EFCC) 
EFC(%) 
EFCC) 
EFCC) 
EFCC®) 
EFCC) 
EFCC) 
EFCC) 
EFCC) 


SPF 
MESSAGE 
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OBJECT 
MODULE 


ECD(®) 


CCONTINUED ON NEXT PAGE) 


SPF 
MESSAGE 


OBJECT 
MODULE 


ECD(®) 
ECD 
ECD(%) 
ECD(%) 
ECD 
ECD(®) 
ECDC) 
EPI 
EPIC%) 
EPIC) 
EPI 
EPIC) 
EPIC) 
EPI 
EPIC) 
EPIC) 
EPI 
EPIC) 
EPIC) 
EPI 
EPI 
EPI 


EFR() 


DIRECTORY 


MESSAGES / OBJECT MODULE LISTING (CONTINUED ) 


SPF OBJECT SPF OBJECT SPF OBJECT 
MESSAGE MODULE MESSAGE MODULE MESSAGE MODULE 
E646 EFRC) F020 FOR GO35 CML 
E647 EFRC®) FO21 FOR G035 UMCS 
E650 EFRC%) F022 FOR G035 URSS 
E651 EFRC) F023 FOR G037 CML 
E652 EFR() F024 FOR G038 CML 
E653 EFR(¥) F025 FOR G039 CML 
E654 EFR(%) F026 FOR G040 EPX 
E655 EFRC®) F027 FOR G044 CCB 
E660 EFRC) GO00l PMD G044 CDA 
E661 EFRCX) GOOl UTIL G04%4 FOR 
E662 EFRC) G002 CBDSN G045 EDO 
E663 EFRC) G002 UCl G048 EDO 
E664 EFRCX) G002 UC2 G050 CML 
E665 EFRC®) G003 CBDSN G053 EDO 
E670 EFRC) G004 CBDSN G054 CBDSN 
E671 EFRC) G005 UHC G054 UDA 
E672 EFRC) G006 UDA G056 CDISPL 
E673 EFR(C%) G006 UVT G057 CDISPL 
E676 EFRC%) G007 CDA G058 CDSIPL 
E677 EFRC) G007 UDA G059 CDISPL 
E680 EFR(%) G008 UMC G060 CAT 
E681 EFRC%) GO09 UHC G061 CAT 
E682 EFR(%) GO010 ECR G062 CAT 
E683 EFRC) G010 EMC G063 CAT 
E684 EFRCX) G010 EMP G064 CAT 
E685 EFRC%) GO10 EPR G065 CAT 
E690 EFRCX) GOl2 ECR G066 CAT 
E691 EFRC%) GOl2 EPO 6067 CAT 
E692 EFR(%) GO013 EPS G068 CML 
E693 EFRC®) GO15 UDA G069 CML 
E694 EFRC#) G018 BRO G069 UDP 
E695 EFRCX) G018 ECR G070 PTC 
E700 EPR G018 EMC GO071 PTC 
E701 EPRC) G018 EPO GO72 PTC 
E702 EPR G018 UMC G073 PTC 
E703 EPRC%) G018 UMCS G074 CAT 
E704 EFR GO018 URSS G076 CAT 
E705 EFRC) G018 USC G077 CAT 
E706 EFR G013 EDI G080 CDA 
E707 EFRC%) G019 EMC G081l CDA 
E708 EFR G013 UMCS G081 ECR 
E709 EFRC) GO19 URSS G081l EMC 
E710 EPR GO020 EDO G082 CDA 
E711 EPRC%) GO020 UMCS G083 CDF 
F000 FOR GO21 BRO 60384 CDF 
FOOl FOR GO021 CML G085 CDF 
F002 FOR G021 EMC G087 CDA 
F003 FOR G021 USC G088 CDA 
F004 FOR GO022 EPO G0390 CBDSN 
FOO5 FOR G024¢ CBR GO91 CBDSN 
F006 FOR G024 CML GO32 CBDSN 
F007 FOR G02¢ EFR G093 CBDSN 
F009 FOR GO027 UDA G094 CBDSN 
F010 FOR G028 TUT G100 CDO 
FOll FOR G030 CML G101 CDO 
FOl2 FOR G031 EDO G102 CDO 
F013 FOR GO31l UMCS G103 cDO 
F014 FOR GO31l URSS G104 CDO 
FO15 FOR G032 EDO G105 CDO 
F016 FOR G032 UMCS G106 cdo 
FOl? FOR G032 URSS G107 CDO 
F018 FOR G033 CML 6108 CbDOo 
FO19 FOR G034 EDO G109 CDO 
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_., 


C¢ 


Ct 


MESSAGES / OBJECT MODULE LISTING (CONTINUED ) 


SPF OBJECT SPF OBJECT SPF OBJECT 
MESSAGE MODULE MESSAGE MODULE MESSAGE MODULE 
G110 CDO M003 UAA S013 SMA 
Glll CDO M005 MHA $014 SMA 
Gll2 CDO M006 MHA $015 SMA 
G113 CDO M007 MHA U000 UDA 
G114 CDO M008 MHA U002 UDA 
G115 CDO M009 MHA UO02 UDMS 
G116 CDO MO10 MHA U003 UDA 
G11? CbDOo MOl11l MHA U003 UDMS 
G118 CDO MOl1l MNT U004 UDM 
G119 CDO M012 MHA U004 UDZ 
G120 BRO MO14 MHA U005 UDP 
G120 USC M015 MHA U006 UDA 
Gl2l BRO M016 MHA U007 UDA 
Gl2l USC M017 MHA U008 UAR 
G122 BRO M018 MHA U008 UDA 
Gl22 UDMS M019 MHA U009 UDA 
Gl22 USC 0001 OPT U010 UAR 
6130 CDO 0002 OPT U0l2 UAR 
G131 CDO 0002 PFT U013 UAR 
G1l32 cDO 0003 OPT U014 UAR 
G133 CDO 0003 PFT UO15 UAR 
G140 CCB 0004 OPT U016 UAR 
G141 CCB 0006 OPT U017 UAC 
6142 CCB 0007 OPT U017 UAR 
G143 CCB 0008 OPT U018 UAR 
G144 CCB 0009 OPT U020 UAD 
G145 CCB POOl CLOG U021 UAD 
G146 CCB P002 CLOG U023 UAR 
G147 CCB P002 PFT U024 UAR 
G149 CHC P003 PMD U025 UAR 
G150 CCB POll PRS U026 UDMS 
G151 CCB PO0l2 PRS U027 UDM 
6152 CCB P013 PRS U028 UDM 
G153 CCB P014 PRS U029 UDMS 
G154 CCB PO15 PRS U030 UDMS 
G155 CCB P016 PRS U031 UDMS 
G156 CCB P017 PRS U032 UDMS 
G157 CCB P020 PFT U033 UDMS 
G158 CCB PO021 PFT U034 UDMS 
G159 CCB P022 PFT U035 UDMS 
Gl62 CCB P023 PFT U036 UDMS 
G166 CCB P024 PFT U037 UDMS 
JO01 JOB P025 PFT U038 UDMS 
J004 JOB P026 PFT U039 UDM 
J006 JOB P027 PFT U039 UDMS 
J007 JOB P028 PFT U040 UDX 
J009 JOB P032 PFTC%) U041 UDX 
J010 JOB P033 PFTC%) U042 UDMS 
J0l1 JOB P034 PFT CX) U045 UDP 
J0l12 JOB PO35 PFT C#) U04%4 UDP 
J013 JOB P036 PFT C%) U045 UDP 
J014 JOB P037 PFTC%) U046 UDP 
JO15 JOB P038 PFT C) U047 UDP 
J016 JOB $001 SMC U048 UDP 
JO17 JOB 5002 SMC U049 UAI 
J018 JOB $003 CTPUT U049 UDX 
J019 JOB $004 CTGET U050 UAA 
J022 CKVPUT $006 SMC U051 UAA 
J023 CKVPUT $007 SMC U052 UAA 
J024 CKVPUT $008 CTPUT U053 UAA 
M001 MHA $008 CTGET U054 UAA 
M002 MHA $011 SMA U055 UAA 
MOOS MHA $012 OMA U056 UAA 
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MESSAGES / OBJECT MODULE LISTING (CONTINUED) 


SPF OBJECT oPF OBJECT SPF OBJECT 
MESSAGE MODULE MESSAGE MODULE MESSAGE MODULE 
U058 UAA U124 URSS U199 UVT 
U059 UAA U125 URSS U200 UC2 
U060 UMC U126 URSS U201 UC2 
U061 UMC Ul27 URS U202 UC2 
U062 UMC U128 URSS U203 UC2 
U063 UMC U129 URS U204 UC2 
U063 UMCS U1390 UAC U205 UC2 
U064 UMC U131l UAC U207 UC2 
U065 UMC U132 UAC U208 UC2 
U066 UMCS U133 UAC U209 UC2 
U067 UMC U134 UAC U210 UMC 
U068 UMC U135 UAC U220 UOL 
U068 UMCS U136 UAC U221 UOL 
U069 UMC U137 UAC U222 UOL 
U070 UMC U138 UAC U223 UOL 
U071 UMC U139 UAC U224 UOL 
U072 UMC U140 UDZ U225 UOL 
U073 UMC U141 UDZ U228 UOL 
U074 UMC U142 UDZ U229 UOL 
U075 UMCS U143 UDZ U230 URS 
U076 UMCS U144 UDZ U231 URS 
U077 UMCS U146 UDZ U233 URS 
U078 UMC U148 UDMS U241 USC 
U078 UMCS U149 UDMS U250 USC 
U079 UMC U150 UVT U251 USC 
U080 UMC U151 UVT U252 USC 
UC80 UMCS U160 UHC U253 USC 
U081 UMCS Ul6l UHC U254 USC 
UN82 UMCS Ul62 UHC U260 USC 
U083 UMCS U164 UHC U261 USC 
U084 UMCS U165 UHC U262 USC 
U085 UMCS U166 UHC U263 USC 
Ud8&é UMCS U167 UHC U264 USC 
U08) UMCS U168 UHC U265 USC 
U088 UMC U169 UHC U266 USC 
U088 UMCS U170 UCl U267 USC 
U089 UMC U1l71 UCl U268 USC 
U091 UHC Ul72 UCl U269 USC 
U092 UHC U173 UCl U270 USC 
U093 UHC U174 UCl U271 USC 
U094 UHC U175 UCl U272 USC 
U095 UHC U176 UCl U281 CHC 
U099 UHC U177 UCl U282 CHC 
U100 UHC U178 UC]l U282 USC 
U101 UHC U179 UCl U283 CHC 
U103 UHC U18l UC1 U283 USC 
U105 UHC U182 UCl U284 CHC 
U106 UHC U183 UCl U285 CHC 
U107 UHC U184 UCl U286 CHC 
U110 UMC U185 UCl U287 CHC 
Ulll UMCS U186 UCl U288 CHC 
Ull2 UMCS U187 UCl U289 CHC 
U113 UMC U188 UC] U290 CHC 
U114 UMC U189 UCl 

U115 UMCS U190 UVT 

U116 UMCS U191 UVT 

U1l1? UNCS U192 UVT 

U118 UMCS U193 UVT 

U119 UMNCS U194 UVT 

U120 URS U195 UVT 

Ul21 URS U196 UVT 

Ul22 URSS U197 UVT 

U1l23 URSS U198 UVT 
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~C 


tai, 


OBJECT MODULE / CALLED OBJECT MODULES LISTING 


SPF OBJECT MODULES WHICH REFERENCE OR CALL OTHER OBJECT MODULES ARE 
LISTED ALPHABETICALLY. EACH OBJECT MODULE NAME IS FOLLOWED BY THE NAMES 
OF THE OBJECT MODULES WHICH IT REFERENCES OR CALLS. 


OBJECT 

MODULE OBJECT MODULES REFERENCED OR CALLED 

BRO CBC CBR CBS CDA CDF CDO CKVGET CKVPUT CML CMSG CVSDE MERR MHA 
CAT CDAIR CMSG CSM CTPUT 

CBC CSM 

CBF CBG 

CBG CDG CSM 

CBR BCD CBC CBF CBG CBS CCP CCS CDG CDISPL CERR CSCROLL CSM 
CBS CSM 

CCB CDAIR CDERR CDG CFI CKVGET CLOG 

ccD CDATE CVSDE 

CDA CBDSN CDAIR CDERR CDF CMSG 

CDAIR CDT 

CDC CRELS CSM 

CDERR CMSG 

CDF CDAIR CDC CMSG 

CDG CDC CDO 

CDISPL CHELP CKVGET CMSG 

CDO CDC CRELS CRESV CSM 

CERR CDISPL CMSG 

CHC CDC CDP CHPJ CHPL CIV CJC CJF CJN CKVPUT CLOG CMB CMSG CSB CTA 


CTPUT MERR MHA 
CHELP CSM 


CHPJ CDG CDP CFI CMSG 

CHPL CAT 

CIPARMS CDC CDG CDO CDP CSM SIP 
CIR CpCc CDG CDO CSM 

CIV CDATE CIR CVSDE 

CJC CDP 

CKVPUT CMSG CTPUT 

CLOG CDATE CDP CMSG CTA 

CMB CKVGET MHA 

CML CCD CDC CDG CDISPL CDO CERR CSCROLL CSM CVM 
CMSG CDG CFI 

CPRINT CDATE CDG CDP CTA CVSDE 
CSB CAT 

CTA CDERR CMSG CSM CTPUT CTl 
CTF CT2 


CTGET CLOG 
CTPUT CLOG 


CTl CDAIR CDC CDO CDT 

CT2 CDAIR CDC CDP 

CUPARMS CDG SOP 

EBA CDG CLOG CMSG CSM CTA CUPARMS EBE MHA 

EBE CSM CTF EBX 

EBI CDP CSM CTA 

EBR CDG CLOG CTA CUPARMS EBE ERA ERD ERI 

EBS CDP CSM CTA CUPARMS EBI 

EBX CUPARMS 

ECR CDA CDC CDF CDO CML CPRINT CVM EDO ERR MERR MHA 
EDD EBE EMP EPO EPS EPX ETC ETS 

EDI CDG ERA ERI EX1 

EDO CDC CDF CDO CDP CLOG CSM ERD ERF EX2 

EFC ERC ERS 

EFR CDISPL CERR CSCROLL EML ERA ERD ERF ERI 
EFT CSM ERA ERC ERD ERF ERI ERN 

EGN ERC ERN 

EGR ERD ERF ERR ERS 

EMC CDA CDC CDF CDO CLOG EDI ERR MERR MHA 

EML CMSG ERA ERI 

EMP CDA CDF CDO CKVGET CKVPUT CVM EBA MERR MHA 
EPC EFT ERA ERC ERD ERF ERI ERR ERS ERX EST ETL 
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OBJECT MODULE / CALLED OBJECT MODULES LISTING (CONTINUED) 


OBJECT 
MODULE 


OBJECT MODULES REFERENCED OR CALLED 

ERA ERC ERD ERF ERI ERN 

49 eee CLOG CML CSB CTA CVM EDO EFC EGN EGR EPP ERA ERD ERF 
CCP CCS ECD EGN EGR 

CML CMSG CVM CVSDE EPR MHA 

CKVGET CKVPUT 

CDA CDF CDO CML CPRINT CSM EBR EBS EBX EDI EDO EFC EFR EFT EML 
EPC EPD EPF EPI EPP ERA ERD ERF ERI 

CMSG EPR MHA 

CSM 

EBS 

EBS ERO ERR ERS ERX 

EBS ERN ERS ERX 

EGN ERC 

ERA 

ERS ERX 

ERA 

ERA 

ERA ERC ERI 

CSM 

CSM EBE 

CAT CDAIR CDERR CDG CFI CKVGET CKVPUT CLOG CSM MERR MHA 

CDC CDG CDP CFI CJC CJF CJN CKVGET CKVPUT CLOG CSB CSM CTA MERR 
MHA 

MHA 

CDG CDISPL CERR CFI CSM 

MERR MHA 

CJF CJN CKVGET CKVYPUT CLOG CUPARMS MERR MHA 

CDC CDP CHPJ CHPL CIV CJC CJF CJN CKVGET CKVPUT CLOG CMSG CSB 
CTA CTF CTPUT CUPARMS MERR MHA 

CDATE CLM CSM CTF MERR MHA PFT PRS 

CLOG MHA 

CAT CLOG MERR MHA 

CKVGET CKVPUT 

CDAIR CDP CMSG CSM CTPUT 

CDP CMSG CTA CTGET CTPUT CUPARMS SMA SML 

CSM SMC SMI 

CDAIR CMSG CSM CTA CTF CTPUT CIPARMS SMA 

CTGET CTPUT 

CKVGET CKVPUT 

CKVGET CKVPUT CSM 

CSM MERR MHA 

CDAIR CDERR CDO CDT CKVGET CKVPUT CLOG MERR MHA 

CLOG 

CDF CLOG MHA 

CIV CKVPUT MHA 

CBDSN CLOG MERR MHA UAC 

CBC CBR CBS CDA CDC CDF CDO CDP CDT CKVGET CLOG CPRINT CTA MERR 
MHA 

CBC CBR CBS CDC CDO CDP CKVGET CKVPUT CLOG CPRINT CTA MERR MHA 
CBDSN CDA CDF CKVGET CKVPUT MERR MHA UAA UAC UAD UAI UAR UDM 
UDP UDX UDZ 

CBC CDG CML MHA UDMS 

CBR CBS CDC CDO CERR CLOG CMSG CPRINT CSM CVM CVSDE MHA 

CDO CML CPRINT UDX 

CCD CDATE CDP CIR CIV CTA 

CDC CDP CLOG CRELS CRESV CTA 

CBDSN CDA CDC CDF CDO CDP CHPJ CHPL CIV CJC CJF CJN CKVGET 
CKVPUT CLOG CSB CTA MERR MHA 

MCE CDF CDO CKVGET CKVPUT CLOG CML CMSG CPRINT CVM MERR MHA 
CDC CDG CDO CDP CERR CLOG CPRINT CVM 

a CBC CBR CBS CCB CDA CDC CDF CDO CHC CKVGET CKVPUT CMB MERR 
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OBJECT MODULE / CALLED OBJECT MODULES LISTING (CONTINUED ) 


OBJECT 

MODULE OBJECT MODULES REFERENCED OR CALLED 

URS CDA CDF CDO CKVGET CKVPUT CLOG CML CMSG MERR MHA URSS 

URSS CDC CDG CDO CERR CLOG CVSDE 

USC CAT CBC CBR CBS CCB CDA CDAIR CDC CDF CDO CHC CKVPUT CMB CML 
CMSG CVSDE MERR MHA 

UTIL MERR MHA 

UVT CBC CBR CBS CDATE CDC CDO CDP CDT CMSG CSM CTA MERR MHA 
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OBJECT MOD 


SPF OBJECT MODULES ARE LISTED ALPHABETICALLY. 


CA 


OBJECT MODULES LI N 


EACH OBJECT MODULE NAME 


IS FOLLOWED BY THE NAMES OF THE OBJECT MODULES WHICH CALL OR OTHERWISE 
REFERENCE IT. 


OBJECT 
MODULE 


CKVGET 
CKVPUT 


CRELS 


CTA 
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OBJECT MODULES WHICH CALL OR REFERENCE 


CBR 
CHPL CSB 


BRO CBR 


BRO CDG 


FOR PTC VOL USC 
UCl UC2 UDM UOL USC UVT 
UDA UHC 


UC2 UDMS UOL USC UVT 
UC] UC2 UDMS UOL USC UVT 


EMC EMP EPR UCI UDA UHC UMC UOL URS USC 

CDA CDF CTl CT2 FOR SMA SMI UAA USC 

CLOG CPRINT PMD UDX UVT 

CDO CHC CIPARMS CIR CML CT1 CT2 ECR EDO EMC EPF JOB PFT 
UDMS UDZ UHC UMC UMCS UGL URSS USC UVT 

CTA FOR UAA 

ECR EDO EMC EMP EPR UAD UC1 UDA UHC UMC UOL URS USC 

CCB CHPJ CIPARMS CIR CML CMSG CPRINT CUPARMS EBA EBR 
JOB MHA UMCS URSS 


CERR CML EFR MHA 


CIPARMS CIR CML CT1 ECR EDO EMC EMP EPR UAA UC1] UC2 UDM 


UDMS UDP UHC UMC UMCS UOL URS URSS USC UVT 
CHC CHPJ CIPARMS CJC CLOG CPRINT CT2 EBI EBS EDO EPF JOB PFT 


SMA SMC 


UC1 UC2 UDX UDZ UHC UMCS UVT 


CDAIR CT1l UAA UC1 UVT 


CBR CML 


EFR MHA UDMS UMCS URSS 


CCB CHPJ CMSG FOR JOB MHA 


UOL USC 


CLOG CPRINT 
UHC UVT 


UHC 
UHC 


UAI UDX UHC 

PFT UHC 

OPT PFT UHC 

OPT PFT UHC 

CDISPL CMB EMP EPP FOR JOB OPT PFT SIP SOP SPC UAA UCI 
UHC UMC UOL URS 

ne nee FOR JOB OPT PFT SIP SOP SPC UAA UAT UC2 UDA UHC 


CTGET CTPUT EBA EBR EDO EMC EPF FOR JOB OPT PFT PRS PTC 
UAD UAR UC1 UC2 UDMS UDZ UHC UMC UMCS URS URSS 


EPO EPR UDM UDP UMC URS USC 

CDERR CDF CDISPL CERR CHC CHPJ CKVPUT CLOG CTA EBA 
PFT SMA SMC SMI UDMS UMC URS USC UVT 

UC2 UDMS UDP UMC UMCS 


PFT 


CBR 
EFT 


UHC 


CBS CDC CDO CHELP CIPARMS CIR CML CTA EBA EBE 
EPR ERA ETC ETS FOR JOB MHA PMD SMA SMD SMI SPC 
EBA EBI EBR EBS EPF JOB PFT SMC SMI UC1l UC2 UDX 


CCONTINUED ON NEXT PAGE) 
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OBJECT MODULE / CALLING OBJECT MODULES LISTING (CONTINUED ) 


OBJECT 
MODULE OBJECT MODULES WHICH CALL OR REFERENCE 
CTF EBE PFT PMD SMI 


CTPUT CAT CHC CKVPUT CTA PFT SMA SMC SMI SML 


CTl CTA 
CT2 CTF 
CUPARMS EBA EBR EBS EBX OPT PFT SMC 
CVM CML ECR EMP EPF EPO UDMS UMC UMCS 
CVSDE BRO CCD CIV CPRINT EPO UDMS URSS USC 
EBA EMP 
EBE EBA EBR EDD ETS 
EBI EBS 
EBR EPR 
EBS EPR ERC ERD ERI 
EBX EBE EPR 
ECD EPI 
EDI EMC EPR 
EDO ECR EPF EPR 
EFC EPF EPR 
EFR EPR 
EFT EPC EPR 
EGN EPF EPI ERN 
EGR EPF EPI 
EML EFR EPR 
EMP EDD 
EPC EPR 
EPD EPR 
EPF EPR 
: EPI EPR 
EPO EDD 
EPP EPF EPR 
" EPR EPO EPS 
EPS EDD 
EPX EDD 
ERA EBR EDI EFR EFT EML EPC EPD EPF EPR ERO ERS ERX EST 
ERC EFC EFT EGN EPC EPD ERN EST 
ERD EBR EDO EFR EFT EGR EPC EPD EPF EPR 
ERF EDO EFR EFT EGR EPC EPD EPF EPR 
ERI EBR EDI EFR EFT EML EPC EPD EPF EPR EST 
ERN EFT EGN EPD ERI 
ERO ERD ECR EGR EMC EPC ERD 
ERS EFC EGR EPC EPF ERD ERI ERR 
ERX EPC ERD ERI ERR 
EST EPC 
ETC EDD 
ETL EPC 
ETS EDD 
EX1 EDI 
EX2 EDO 
MERR BRO CHC ECR EMC EMP FOR JOB MNT OPT PFT PMD PTC TUT UAA UAR UCI 
UC2 UDA UHC UMC VOL URS USC UTIL UVT 
MHA BRO CHC CMB EBA ECR EMC EMP EPO EPS FOR JOB MERR MNT OPT PFT 


PMD PRS PTC TUT UAA UAD UAI UAR UC1 UC2 UDA UDM UDMS UHC UMC 
UOL URS USC UTIL UVT 


PFT PMD 

PRS PMD 

SIP CIPARMS 

SMA SMC SMI 

SMC SMD 

SMI oMD 

SML SMC 

SOP CUPARMS 

SPFSC93X IKTTMPX1 
é SPFSC94X IKTTMPX2 

UAA UDA 


CCONTINUED ON NEXT PAGE) 
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OBJECT MODULE / CALLING OBJECT MODULES LISTING (CONTINUED) 


OBJECT 

MODULE OBJECT MODULES WHICH CALL OR REFERENCE 
UAC UAR UDA 
UAD UDA 

UAT UDA 

UAR UDA 

UDM UDA 
UDMS UDM 

UDP UDA 

UDX UDA UDP 
UDZ UDA 
UMCS UMC 
URSS URS 
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OBJECT MODULE / EXTERNAL SYMBOLS DEFINED LISTING 


SPF EXTERNAL SYMBOLS WHICH ARE DEFINED BY SPF OBJECT MODULES ARE LISTED 
ALPHABETICALLY. EACH OBJECT MODULE NAME IS FOLLOWED BY A LIST OF THE 
EXTERNAL SYMBOLS DEFINED. ALL OBJECT MODULES IN SPF CONTAIN THEIR OWN 
te AS AN EXTERNAL SYMBOL DEFINED, AND THESE ARE NOT INCLUDED IN THE 
LIST. 


OBJECT 

MODULE EXTERNAL SYMBOLS DEFINED 

EPC ECLAFTER ECLBEFOR ECLBOUND ECLCOPY ECLCOLS ECLDEL ECLINSRT 
ECLMOVE ECLMASK ECLOVER ECLREP ECLSBOT ECLSHOW ECLSTOP ECLSL 
ECLSCR ECLSCL ECLSR ECLTENTR ECLTFLOW ECLTSPLT ECLTABS ECLXCLUD 

EPF EPFCANCL EPFCHG EPFFIND EPFLOC EPFNUMB EPFPROF EPFRESET 
EPFSAVE EPFSUBMT 

EPI EPICANCL EPIMEMB EPINUMB EPIOPTS EPIREASN EPIRESET 

ETL EPCELC 

SMA STAI 

SMI STAE 
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OBJECT MODULE / EXTERNAL SYMBS REFERENC LISTIN 


SPF EXTERNAL SYMBOLS WHICH ARE REFERENCED BY SPF OBJECT MODULES ARE 
LISTED ALPHABETICALLY. EACH OBJECT MODULE NAME IS FOLLOWED BY A 
LIST OF THE EXTERNAL SYMBOLS REFERENCED. 


OBJECT 
MODULE 


CIPARMS 
CUPARMS 
PMD 
SMC 
SMD 
SMI 
TSC 


UAR 
UDA 
UDM 
UDP 
UMC 
URS 


EXTERNAL SYMBOLS REFERENCED 

SIP TKV 

SOP 

PFT PRS 

SMA SML 

SMC SMI TKW TRT 

CIPARMS SMA 

BCD CAT CBC CBDSN CBF CBG CBR CBS CCB CCD CCP CCS CDA CDAIR 
CDATE CDC CDERR CDF CDG CDISPL CDO CDP CDT CERR CFI CHC CHELP 
CHPJ CHPL CIR CIV CJC CJF CJN CKVGET CKVPUT CLM CLOG CMB CML 
CMSG CPRINT CRELS CRESV CSB CSCROLL CSM CTA CTF CTGET CTPUT CTl 
CT2 CUPARMS CVM CVSDE EBA EBE EBI EBR EBS EBX ECD ECLAFTER 
ECLBEFOR ECLBOUND ECLCOLS ECLCOPY ECLDEL ECLINSRT ECLMASK 
ECLMOVE ECLOVER ECLREP ECLSBOT ECLSCL ECLSCR ECLSHOW ECLSL 
ECLSR ECLSTOP ECLTABS ECLTENTR ECLTFLOW ECLTSPLT ECLXCLUD ECR 
EDI EDO EFC EFR EFT EGN EGR EMC EML EMP EPC EPD EPF EPFCANCL 
EPFCHG EPFFIND EPFLOC EPFNUMB EPFPROF EPFRESET EPFSAVE EPFSUBMT 
EPI EPICANCL EPIMEMB EPINUMB EPIOPTS EPIREASN EPIRESET EPO EPP 
EPR EPS EPX ERA ERC ERD ERF ERI ERN ERO ERR ERS ERX EST ETC ETL 
ETS MERR MHA 

UAC 

UAA UAC UAD UAI UAR UDM UDP UDX UDZ 

UDMS 

UDX 

UMGS 

URSS 
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OBJECT MODULE / SVC ROUTINE LISTING 


SPF OBJECT MODULES WHICH REFERENCE SYSTEM SERVICES VIA SVC ARE LISTED 
EACH OBJECT MODULE NAME IS FOLLOWED BY THE SVC NUMBER 
AND SYSTEM SERVICE IT REFERENCES. 


ALPHABETICALLY. 
OBJECT svc 
MODULE NO. 
BRO 18 
CAT 1 
2 
3 
6 
18 
40 
42 
62 
CBDSN 26 
CCB 18 
19 
20 
CDAIR 6 
26 
26 
40 
CDC 20 
CDERR 26 
CDG 1 
2 
CDISPL 1 
2 
13 
13 
CDO 19 
27 
60 
CFI 18 
CHC 1 
2 
CHELP 6 
CIPARMS 6 
18 
21 
CIV 24 
27 
CKVPUT 1 
2 
CLM 8 
CLOG ll 
CML 18 
31 
CPRINT ll 
18 
CRELS 48 
CRESV 40 
56 
56 
CSM 4 
10 
10 
CTA 1 
2 
CTF 1 
2 
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SYSTEM 
SERVICE 


oe ee eer ee ee a 


BLDL 
EXTRACT 
ATTACH 
DETACH 
LOCATE 
FIND 
OPEN 
CLOSE 
LINK 
LOCATE 
UNCATALOG 
EXTRACT 
CLOSE 
LOCATE 
WAIT 
POST 
WAIT 
POST 
ABEND 
ABEND 
OPEN 
OBTAIN 
STAE 
BLDL 
WAIT 
POST 
LINK 
LINK 
BLDL 
STOW 
DEVTYPE 
OBTAIN 
WAIT 
POST 
LOAD 
TIME 


GETMAIN 
FREEMAIN 
GETMAIN 
WAIT 
POST 
WAIT 
POST 


OBJECT 
MODULE 


CT2 


CUPARMS 
EBS 
ECR 


EDO 


EMC 


EPO 


EPS 
FOR 


MHA 


PFT 


PMD 


SCN 


SMA 


SMC 


CCONTINUED ON NEXT PAGE) 


SYSTEM 
SERVICE 
TGET 
STFSMODE 
TPUT 
STFSMODE 
LOCATE 
UNCATALOG 
SCRATCH 
RDJFCB 
UNCATALOG 
SCRATCH 
TIME 
TIME 
BLDL 

DEQ 

EN 

TIME 
STOW 
STAE 
BLDL 
STOW 

DEQ 

ENQ 

BLDL 

DEQ 

EN 

DE@ 

EN 

FIND 
OPEN 
CLOSE 
ABEND 
WAIT 
POST 
GTSIZE 
STFSMODE 
LINK 
LOAD 
DELETE 
TIME 
EXTRACT 
FREEMAIN 
GETMAIN 
FIND 


T 
STLINENO 
WAIT 

POST 

LOAD 
DELETE 
ABEND(997) 
STFSMODE 
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| OBJECT MODULE / SVC ROUTINE LISTING (CONTINUED) 


OBJECT SVC SYSTEM 
OBJECT SVC SYSTEM 


MODULE NO. SERVICE MODULE NG. SERVICE 
SMD 2 POST UDZ l WAIT 
8 LOAD 42 ATTACH 
10 FREEMAIN 62 DETACH 
10 GETMAIN UHC 18 BLDL 
20 CLOSE UMC 18 BLDL 
79 STATUS UMCS 18 BLDL 
94 STFSMODE 21 STOW 
96 STAX URSS ll TINE 
SMI 8 LOAD 18 BLDL 
ll TIME 21 STOW 
19 OPEN USC 18 BLDL 
24 DEVTYPE UTIL 6 LINK 
44 CHAP UVT ll TIME 
60 STAE 27 OBTAIN 
64 RDJFCB 
93 TPUT 
94 GTERM 
94 GTSIZE 
94 STCC 


94 STFSMODE 
94 STLINENO 


94 STTRAN 

94 TCLEARQ 
SML 1 WAIT 

2 POST 


94 STLINENO 


SPF 6 LINK 
10 FREEMAIN 
10 GETMAIN 
19 OPEN 
20 CLOSE 
24 DEVTYPE 
SPFCALCP 1 WAIT 
6 LINK 
8 LOAD 
9 DELETE 
10 FREEMAIN 
10 GETMAIN 
10 IKJRLSA 
18 BLDL 
19 OPEN 
20 CLOSE 
42 ATTACH 
62 DETACH 
94 TCLEARQ 
UAC 24 DEVTYPE 


26 CATALOG 
26 UNCATALOG 


UAR 24 DEVTYPE 
30 RENAME 
1 UCA 6 LINK 
Uc] i WAIT 
26 INDEX 
26 LOCATE 
42 ATTACH 
62 DETACH 
UC2 I WAIT 
42 ATTACH 
62 DETACH 
UDMS 18 BLDL 
| 21 STOW 
UDX ll TIME 
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| SUC ROUTIN OBJECT MODULE LISTING 


SYSTEM SERVICES WHICH ARE REFERENCED BY SPF VIA SVC ARE LISTED BY SVC 
NUMBER AND SERVICE NAME. EACH SERVICE IS FOLLOWED BY THE NAMES OF THE 
OBJECT MODULES WHICH REFERENCE IT. 


SVC SYSTEM OBJECT SVC SYSTEM OBJECT 
NO. SERVICE MODULE NO. SERVICE MODULE 
1 WAIT CAT 11 TIME CLOG 

CDG CPRINT 
CDISPL CUPARMS 
CHC EBS 
CKVPUT EDO 
CTA PMD 
CTF SMI 
PFT UDX 
SMA URSS 
SMC UVT 
SML 13. ABEND CDISPL 
SPFCALCP MHA 
SMA 
uc2 SMC 
UDZ 18 BLDL BRO 
2 POST CAT CAT 
CDG CF 
CDISPL CIPARMS 
CHC CM 
CKVPUT CPRINT 
CTA ECR 
CTF EMC 
PFT EPO 
SMC SPFCALCP 
SMD UDMS 
SML UHC 
3 EXIT CAT UMC 
4 GETMAIN CSM UMCS 
6 LINK CAT URSS 
| CDAIR USC 
CHELP 18 FIND CCB 
| CIPARMS FOR 
PMD SCN 
SPF 19 OPEN CCB 
SPFCALCP CDO 
UCA FOR 
UTIL SCN 
8 LOAD CLM SMI 
PMD SPF 
| SMC SPFCALCP 
| SMD 20 CLOSE CCB 
SMI CDC 
SPFCALCP FOR 
9 DELETE PMD SCN 
| SMC SMD 
SPFCALCP SPF 
10 FREEMAIN’ CSM SPFCALCP 
SCN 21 STOW CIPARMS 
SMD EDO 
SPF EMC 
SPFCALCP UDMS 
10 GETMAIN CSM UMCS 
SCN URSS 
SMD 24 DEVTYPE CIV 
SPF SMI 
SPFCALCP SPF 
10 IKJRLSA SPFCALCP UAC 
UAR 
| 


CCONTINUED ON NEXT PAGE) 
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| SVC ROUTINE / OBJECT MODULE LISTING (CONTINUED) 


SVC SYSTEM OBJECT SVC SYSTEM OBJECT 
NO. SERVICE MODULE NO. SERVICE MODULE 


26 CATALOG UAC 94 STFSMODE CTGET 
26 INDEX UCl CTPUT 
26 LOCATE CBDSN PFT 


S 
UCl 94 STLINENO SMA 
26 UNCATALOG CDAIR SMI 


CT2 94 STTRAN SMI 
UAC 94 TCLEAR SMI 
a7 OBTAIN CDO SML 
CIV SPFCALCP 
UVT 96 STAX SMD 
29 SCRATCH CTl 
30 RENAME UAR 


FEOV 
40 EXTRACT CAT 


42 ATTACH CAT 


44 CHAP SMI 
48 DEQ CRELS 


56 EN@ CRESV 
56 RESERVE CRESV 


60 STAE CDO 


62 DETACH CAT 


64 RDJFCB CTl 
79 STATUS SMD 


93 TGET CTGET 
93 TPUT CTPUT 


94 GTERM SMI 
94 GTSIZE PFT 
94 STCcCc SMI 
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OBJECT MODULE / LOAD MODULE REFERENCED LISTIN 


OBJECT MODULES WHICH ISSUE LINK, LOAD, OR ATTACH SYSTEM SERVICES ARE 
LISTED BY SYSTEM SERVICE AND THEN OBJECT MODULE. EACH OBJECT MODULE IS 
ee ou TCE: BY TRE NAMES OF THE LOAD MODULES IT REFERENCES VIA THE SYSTEM 
SERVICE. 


SYSTEM OBJECT 
SERVICE MODULE LOAD MODULE REFERENCED 
ATTACH CAT (COMMAND PROCESSOR PASSED BY CALLER) 
EXEC IKJEFT25 SPFCALCP 
SMA SPFPMD 
SPFCALCP CPROGRAM SPECIFIED IN CALL COMMAND) 
UCI IEHLIST 
UC2 IDCAMS 
UDZ TEBCOPY 
LINK CAT IKJPARS IKJPTGT IKJPUTL IKJSCAN IKJSTCK 


CDAIR IKJEFDOO 

CHELP SPFTUTOR 

CIPARMS SPFSPC 

PMD SPFBRO SPFEDIT SPFFOR SPFJOB SPFOPT SPFIMENU SPFTSO 
SPFTUTOR SPFUCA SPFUDA SPFUHC SPFUMC SPFUOL SPFURS 
SPFUSC SPFUTIL SPFUVT 


SPF SPFMAIN 
SPFCALCP IKJEFDO0 IKJPARS IKJPUTL IKJSTCK 
UCA SPFUCI SPFUC2 
UTIL SPFFOR SPFUCA SPFUDA SPFUHC SPFUMC SPFUOL SPFURS 
SPFUSC SPFUVT 
LOAD SMC SPF3277 SPF3278 SPF3278C 
SMD SPFSUBS SPFTBLS SPFICM 
SMI SPF3277 SPF3278 SPF3278C 


SPFCALCP IKJEFF18& 
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HE 3 96 HE 3 HE 3 IE HE DE IE DE DE IE HE DE IKE 3K IE DE DE 9 IE DE DE IE DE DE IE DE DE IE DE DE IE IE DE DE IE DE DE DE DE DEE 
x ¥% 
x x 
% SECTION 5 % 
x % 
% DATA AREAS * 
x ¥ 
x % 
% % 


DE HE HE HE HE HE HE HE HE HE HE HE HE DE HE IE HE IE HE DE DE DE DE DE HE DE DE IE HE DE DE DE DE DE DE DE IE DE IE IE HE EH 


THIS SECTION SHOWS THE BLOCKS, TABLES, AND COMMON AREAS THAT ARE USED IN 


SPF. THE FIRST TWO PAGES GIVE AN OVERVIEW OF THE PRIMARY SPF TABLES. 
THE OVERVIEW IS FOLLOWED BY A LIST OF ALL OF THE BLOCKS, TABLES, AND 
COMMON AREAS REFERENCED BY SPF AND A DESCRIPTION OF THOSE THAT ARE 
UNIQUE TO SPF. FINALLY, FORMATS ARE INCLUDED FOR COMPLEX AND/OR 
EXTENSIVELY USED SPF TABLES. 
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PRINARY DATA AREAS DIAGRAM 


=) 
THIS CHART SHOWS THE CENTRAL SPF TABLES AND THEIR RELATIONSHIPS. THOSE » ' 
TABLES ENCLOSED IN ASTERISKS (¢€ ®TCT® ) OR A COPY OF THE TABLE ARE 

Eee ager FROM THE TLD AS WELL AS BEING ADDRESSABLE AS SHOWN 

IN THE : 


pee 
( TSO COMMAND PROCESSOR 


COMMON 
SUBROUTINES 


LOC SPFPARMS 


TFD 


TPS 


cevTeL 


KEYTBL3 TAD 


TRTO 


DCB 


* 


LOW 


VAL TRTL 


: 
SPFLOG 
TFD 
ETO DCB 


SPFEDITA 
TFD 
DCB TEMPX.CNTL 
TFD 
SPFEDITB 


TFD DCB 


DCB 


TEMPX. LIST 
TFD 


@} [) [8 


DCB 


OPTIONAL ADDITIONAL TABLES 
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c 


IMARY DATA AREAS LIST 


THE FOLLOWING LIST IDENTIFIES THE SPF TABLES THAT ARE IN THE PRECEEDING 


CHART. 


LOAD MODULE AND OBJECT MODULE WHERE THE TABLE EXISTS. 


FOLLOWING THE NAME AND TITLE OF EACH TABLE IS THE NAME OF THE 


LOAD MODULES 


SPFMAIN, SPFSUBS, SPFTCM AND SPF3277 ARE REENTRANT MODULES. 

TSI - SPF INTERFACE SPFTBLS - TSI 
CBUF - COMMAND BUFFER (PARAMETERS) 
UPT — USER PROFILE TABLE CPASSED ) 
PSCB _ PROTECTED STEP CONTROL BLOCK (FROM TMP ) 
ECT — ENVIRONMENTAL CONTROL TABLE (TO SPF ) 
TCM - COMMAND TABLE SPFTCM - TCM 
TCT ~ CONTROL TABLES SPFTBLS - TSI 

Loc - 3270 LOCATION TRANS SPFMAIN - TRT 
ATT - ATTRIBUTE BYTE TRANSLATE SPFMAIN - TRT 
AID - ATTENTION ID TRANS TBL SPFMAIN - TRT 
UPP - UPPER CASE INPUT TRANS TBL SPF3277 - TTl 
LOW - LOWER CASE INPUT TRANS TBL SPF3277 - TTl 
VAL - 3270 TRANSLATE SPF3277 - TTl 
BTO - BROWSE TERM OUTPUT TRANS TBL SPF3277 - TTl 
ETO - EDIT TERM OUTPUT TRANS TBL SPF3277 - TTI 
GSc - GENERIC STRING CHARS TBL SPF3277 - TTl 
GSM - GENERIC STRING MASTER TBL SPF3277 - TTl 
GSS - GENERIC STRING SPECIAL TBL SPF3277 - TTl 
TDS —- DATA SET INTERFACE SPFTBLS - TSI 
TFD - FILE DEF (SPFPARMS) SPFTBLS - TSI 
DCB - DCB SPFTBLS - TSI 
TFD - FILE DEF CSPFPROCS) SPFIBLS - TSI 
DCB - DCB SPFTBLS - TSI 
TFI ~- FIND MEMBER LIST SPFTBLS - TSI 
TFD - FILE DEF (SPFMENUS) SPFTBLS - TSI 
DCB - DCB SPFTBLS - TSI 
TFI - FIND MEMBER LIST SPFTBLS - TSI 
TFD - FILE DEF (CSPFMSGS) SPFTBLS - TSI 
DCB - DCB SPFTBLS - TSI 
TFI - FIND MEMBER LIST SPFTBLS -- TSI 
TFD - FILE DEF (SPFLIST) SPFTBLS - TSI 
DCB - DCB SPFTBLS - TSI 
TFD - FILE DEF (SPFLOG) SPFTBLS - TSI 
DCB - DCB SPFTBLS - TSI 
TFD - FILE DEF C(SPFEDITA) SPFTBLS - TSI 
DCB - DCB SPFTBLS - TSI 
TFD - FILE DEF CSPFEDITB) SPFTBLS - TSI 
DCB - DCB SPFTBLS - TSI 

TKV - KEYWORD/VALUE TABLE (GETMAINED) 
TKW - KEYWORD TABLE SPFMAIN - TKW 
KEYTBL1 - SCROLLING KEYWORDS SPFMAIN - TKW 
KEYTRL2 - EDIT LINE COMMAND KEYWORDS SPFMAIN - TKW 
KEYTBL3 - EDIT/BROWSE PRIMARY KEYWORDS SPFMAIN - TKW 
TPD - PHYSICAL DISPLAY SPFTBLS ~- TSI 

TPS - PHYSICAL SCREEN IMAGE (GETMAINED) 

TSB - SCREEN I/O BUFFER (GETMAINED) 
TLD (1) - LOGICAL DISPLAY SPFTBLS - TSI 
TFK (1) ~ FUNCTION KEY TABLE SPFTBLS - TSI 
TAD (1) - ALLOCATED DDNAME TABLE SPFTBLS - TSI 
TRTO €1) =- TRANSLATE AND TEST ZEROS SPFTBLS - TSI 
TRT1 €1) - TRANSLATE AND TEST IDENTITY SPFTBLS - TSI 

TLS €1) - LOGICAL SCREEN IMAGE (THESE ) 

MHAF (1) - MENU HANDLER BUFFER (TABLES ) 

TFD (1) - FILE DEF (TEMPX.CNTL) CARE ) 

DCB (1) - DCB (GETMAINED) 

TFD (1) - FILE DEF CTEMPX.LIST) CAS ) 

DCB (1) ~- DCB CREQUIRED ) 
TSC - SPF COMMON SUBROUTINE INTERFACE SPFSUBS - TSC 
TSV - SPF VARIABLES SPFTBLS - TSI 
TXC - SPF EXITS CONTROL TABLE SPFTBLS ~- TSI 


C 
C 
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"SPF3278C - TT3" IS USED. 


(%) 
(%) 
(%) 
(%) 
(%) 
(%) 
(CX) 
(*) 


1) MORE THAN ONE COPY CAN EXIST TO SATISFY SPLIT SCREEN REQUIREMENTS. 
%) USED FOR 3277 TERMINALS. FOR 3278 TERMINALS "SPF3278 - TT2" IS USED. 
FOR 3278 CANADIAN/FRENCH TERMINALS 


DATA AREAS 
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A _ AREA 


THE FOLLOWING IS A LIST OF DATA AREAS REFERENCED BY SPF. 


Is 


THE TABLE NAME 


IS FOLLOWED BY A CODE INDICATING THE TYPE OF CONTROL BLOCK (0-OS/VS, 


T-TSO, 


THE TABLE. 
SOME TABLES, 
FORMAT DESCRIPTION. 


TABLE. 


S-SPF CONTROLLER, 
THE FORMAT DESCRIPTION, 


P-SPF PROCESSOR) 


IS THE NAME OF THE PLS SEGMENT THAT DESCRIBES 

THIS SEGMENT CAN BE FOUND IN PLS LISTINGS THAT REFERENCE THE 
FOR EXAMPLE 256 BYTE TRANSLATE TABLES DO NOT HAVE A 
THE NAMES OF THE SOURCE MODULE, 


OBJECT MODULE, AND 


LOAD MODULE ARE SHOWN FOR TABLES WHICH ARE COMPILED. 


AN ASTERISK (€%) FOLLOWS TERMINAL DEPENDENT TABLES. 


3277 TERMINALS IS SHOWN. FOR 3278 TERMINALS REPLACE TT1 WITH TT2 AND 


REPLACE 3277 


ATTACHL 
BCT 

BLB 
BLDL 
BTO( #) 
CBT 
CBUF 
CIVCOMM 
CMLCENT 
cscs 
CSPL 
CVT 
DAIRACB 
DAPL 
DAOC 
DAOO 
DANS 
DA1LO 
DA18& 
DAcC 
DA34 
DCB 

DEB 
DECB 
DEVT 
DSCB 
EBT 

ECB 

ECT 

EDL 

EDR 

EDT 

ELC 
ETO( #) 
GSC(*) 
GSM(*) 
GSS(#) 


‘itso 

fiat 

ial 
vill 


(trtrtttttiotagcoecottittttirtrtetrototttttatt@etoaocgctiia 


fbr’tttt tell tl tbl bt tdtaAtdt add at ada ae tat i t'at bbe bet tt tha che 


vyuawmiilitlitéditttiittttitttttttttitttittianttitinmtt rata 


TZToUuvGVVvVVBwaIi ivptititittttttt te_etttt tl_ tuvptltyuaugtivguourttittee 
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WITH 


iu 
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3278. 


OS/VS CONTROL BLOCKS 
TSO CONTROL BLOCKS 
SPF CONTROLLER TABLES 
SPF PROCESSOR TABLES 


FORMAT 
DESCRIPT 


ASCBDCLS 
ASVTDCLS 
ASXBDCLS 
ATTDCLS 
BCTDCLS 
BLBDCLS 
BLOLOCLS 


CBTDCLS 
CIVCOMM 
CMLDCLS 
CSCBDCLS 
CSPLOCLS 
CVTDCLS 
DA3¢0CLS 
DAPLOCLS 
DAOCDCLS 
DAOODCLS 
DAOS8DCLS 
DAICDCLS 
DAL8DCLS 
DA2CDCLS 
DA34DCLS 
DCBDCLS 
DEBOCLS 
DECBOCLS 
DEVTDCLS 
DSCBDCLS 
EBTDCLS 
ECBDCLS 
ECTOCLS 
EDLDCLS 
EDRDCLS 
EDTDCLS 
ELCDOCLS 


CCONTINUED ON NEXT PAGE) 


SOURCE 
MODULE 


= 
— 
=) 
q 
Q 


PETE EEE EEE PEEP EEE EEE 


OBJECT 
MODULE 


4His 
Ada 
i Ht et 


LOAD 
MODULE 


wo 
UU 
be 2 | 
ul 
nm 
~ 
~ 


PEPER EET EE PEPE 


THE TABLES USED FOR 


TITLE 


ATTENTION ID TRANSLATE TABLE 
ADDRESS SPACE CONTROL BLK 
ADDRESS SPACE VECTOR TABLE 
ADDRESS SPACE EXTENSION BLOCK 
ATTRIBUTE BYTE TRANSLATE TABLE 
ATTACH MACRO LIST FORM 

BROWSE CONTROL TABLE 

BROWSE LINE BUFFER 

BLDL MACRO CONTROL BLOCK 
BROWSE TERMINAL OUTPUT TR TABLE 
COMMON BROWSE TABLE 

TSO COMMAND BUFFER 

COMMON VTOC INFORMATION AREA 
COMMON MEMBER LIST ENTRY 
COMMAND SCHEDULING CONTROL BLK 
COMMAND SCAN PARAMETER LIST 
COMMUNICATIONS VECTOR TABLE 
DAIR ATTRIBUTE CONTROL BLOCK 
DAIR PARAMETER LIST 

DAIR DAOC BLOCK 

DAIR DAOO BLOCK 

DAIR DAOS BLOCK 

DAIR DALO BLOCK 

DAIR DA18& BLOCK 

DAIR DA2C BLOCK 

DAIR DA34¢ BLOCK 

DATA CONTROL BLOCK 

DATA EXTENT BLOCK 

DATA EVENT CONTROL BLOCK 
DEVICE TABLE 

DATA SET CONTROL BLOCK 

EDIT BACKUP TABLE 

EVENT CONTROL BLOCK 
ENVIRONMENTAL CONTROL TABLE 
EDIT DISPLAY LINE 

EDIT RECORD 

EDIT TABLE 

EDIT LINE COMMANDS 

EDIT TERM OUTPUT TRANS TABLE 
GENERIC STRING CHARACTER TABLE 
GENERIC STRING MASTER TABLE 
GENERIC STRING SPECIAL CHAR TBL 
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-~¢ 


DATA AREAS LIST CCONTINUED ) 


TABLE FORMAT SOURCE OBJECT LOAD 
NAME OTS P DESCRIPT MODULE MODULE MODULE TITLE 
JSCB O--- %Jsceocis — os — JOB STEP CONTROL BLOCK 
KEYTBL1 S75 2 == KEYTBLL TKW SPFMAIN KEYWORD TABLE 1 (SYSTEM) 
KEYTBL2 --sP -— KEYTBL2 TKW SPFMAIN KEYRORD TABLE 2 (EDIT LINE) 
KEYTBL3 SS\0 0 Ja KEYTBL3 TKW SPFMAIN KEYKORD TASLE 3 (PRIMARY CMD) 
KVBLOCK SSR oar —- = area: KEYWORD/VALUE BLOCK 
Loc SS TRTLOC TRT SPFMAIN 3270 SCREEN LOCATION TRANS TBL 
LOW( # ) a= Ss = TT1LLOW 8 TT1 SPF3277 LOWER CASE TRANSLATE TABLE 
LWA O--- LwapcLs -—— = <= LOCAL WORK AREA 
MHAF --- P MENUDCLS —— ae — MENU BUFFER 
PSA O--- pPSADcLsS -— — — PREFIX STORAGE AREA 
PSAX O---  PSAXDCLS -—— —— = PREFIX STORAGE AREA EXTENSIONS 
PSCB - T--  PSCBDCLS —— — —- PROTECTED STEP CONTROL BLOCK 
RB O--- RBOCLS -— a —— REQUEST BLOCK 
RBX QO--- £RBxDCLS —— — =— REQUEST BLOCK EXTENSION 
SDE --$ P sp—EDCcL$ -— — ares SPF DIRECTORY ENTRY 
SDWA O---  £4SDWADCLS -—— = <—- SYSTEM DIAGNOSTIC kKORK AREA 
STOW o---  STOKDCLS —— a — STOW MACRO CONTROL BLOCK 
TAD = SS. See TLDI TSI SPFTBLS ALLOCATED DDNAME TABLE FOR TLD1 
TAD2 ==. SS TLD2 TSI SPFTBLS ALLOCATED DDNAME TABLE FOR TLD2 
TCB O--- TesDpCLsS -—— ac = TASK CONTROL BLOCK 
TCD === P. TCODCLS. ——— a ara COMMAND DEFINITION TABLE 
TCM --$ P  TCMDCLS TCM TCM SPFTCM COMMAND TABLE 
TCT -~-$P TcrTrocls TCT TsI SPFSUBS CONTROLLER TABLES ARRAY 
Tes -~-- P Tesocis - —= — COMMAND SCAN TABLE 
TCST -T-- #TesToc.s -— =< ==> TERM CONTROL ADDR SPACE TABLE 
TCX O--- TexDCcLts —— —- —— TCAM ADDRESS VECTOR TABLE 
TOS -- $- TOSDCLS TDS TSI SPFSUBS DATA SET TABLE 
TFO -- $ P TFDDCLS -— —— <a FILE DEFINITION TABLE 
TFI = SP TRIDCLS: —= —— —= FIND MEMBER TABLE 
TFK oS OT = = = FUNCTION KEY TABLE 
TIOT O--- £4TIOTDCLS -— er — TASK INPUT/OUTPUT TABLE 
TKV SSP == TKV TKV SPFMAIN INITIAL KEYWORD/VALUE TABLE 
TKV -- SP TKvocLS -— —— —= KEYWORD/VALUE TABLE 
TKW -- S$ P  TKWOCLS TKW TKW SPFMAIN KEYKORD TABLE 
TLO -~-S$P TLODCLS -—— ae —— LOGICAL DISPLAY TABLE 
(TLDO) SS SS TLDO TSI SPFTBLS LOGICAL DISPL TBL (CONTROLLER ) 
(TLDO1) ==> P= TLOL TSI SPFTBLS LOGICAL DISPL TBL (SCREEN 1) 
(TLD2 ) SF TLD2 TSI SPFTBLS LOGICAL DISPL TBL (SCREEN 2) 
TLS --$P TLispce.ts — — = LOGICAL SCREEN TABLE 
(TLS1) == PR — Ta — LOGICAL SCREEN TABLE FOR TLDI1 
(TLS2) == — —— —s — LOGICAL SCREEN TABLE FOR TLD2 
TPD -- S$-  TPDDCLS TPD TSI SPFTBLS PHYSICAL DISPLAY TABLE 
TPS --S- espclts -—— — or PHYSICAL SCREEN TABLE 
TRPT O---  £TRPTDCLS —— — = TIOC REFERENCE POINTER TABLE 
TRTOO SS 5S TLDO TSI SPFTBLS ZEROS TRANS TABLE FOR TLDO 
TRTOL SSP == TLD TSI SPFTBLS ZEROS TRANS TABLE FOR TLDI 
TRTO2 Se = TLD2 TSI SPFTBLS ZEROS TRANS TABLE FOR TLD2 
TRT10 == = TLDO TSI SPFTBLS IDENTITY TRANS TABLE FOR TLDO 
TRT11 ee ce) TLD TSI SPFTBLS IDENTITY TRANS TABLE FOR TLD1 
TRT12 == Po. TLD2 TSI SPFTBLS IDENTITY TRANS TABLE FOR TLD2 
TSB -=-$- Tsepcils -—— paca a TPUT/TGET SCREEN BUFFER 
TSC -~- SP TSCDCLS TSC TSsc SPFSUBS CONHON SUBROUTINE ADDRESS TABLE 
TSI -- $P  TSIDCLS TSI TSI SPFTBLS SPF INTERFACE TABLE 
TSV -- $ P TSVDCLS TSV TSI SPFTBLS SPF VARIABLES TABLE 
TSVKV --S$- £TSVvKVDCL -—— = —— TSV KEYWORD/VALUE TABLE 
TTT eS SS-— -RRIDELS: === waa —— TERM DEPENDENT TRANS TABLES 
TXC -- S$ P TXCBCLS TXC TSI SPFTBLS SPF EXITS CONTROL TABLE 
UCB O--- ucBDCLS -— — — UNIT CONTROL BLOCK 
UDACOMM --- P  UDACOMH — eacacas — DATASET UTILITY COMMON AREA 
UNCCOMM -—-- PP UNcecOoM — — — MOVE/COPY UTILITY COMMON AREA 
UPP( % ) S45 Fo ss TTLUPP = 7TT1 SPF3277 UPPER CASE TRANSLATE TABLE 
UPT ===. “UPTDCLS << = —= TSO USER PROFILE TABLE 
URSSPARM --- P- URSOSCOMM -—— — ina RESET UTILITY COMMON AREA 
VALC#) = 5.8. TTIVAL = TTl SPF3277 VALID CHARACTER TRT TABLE 
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DATA AREAS DESCRIPTIONS 


arb 


ATT 


BCT 


BLB 


BTO 


CBT 


CIVCOMM 
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ATTENTION ID TRANSLATE TABLE 


USED TO TRANSLATE 3270 AID'S CATTENTION IDENTIFIERS) INTO SPF 
LOGICAL AID'S. FOR EXAMPLE, THE 3270 AID OF X'7C* (PROGRAM 
FUNCTION KEY 12) IS TRANSLATED TO SPF LOGICAL AID OF l2. 

THE AID IS USED IN CONJUNCTION WITH THE TFK TO ASSIGN SPECIFIC 
SPF FUNCTIONS TO SPECIFIC 3270 PF KEYS. 


ATTRIBUTE BYTE TRANSLATE TABLE 


USED TO TRANSLATE FROM SPF LOGICAL ATTRIBUTE BYTES INTO 3270 
ATTRIBUTE BYTES. SPF LOGICAL ATTRIBUTE BYTES ARE DEFINED IN 
TLSDCLS (SEE TLS DESCRIPTION) AND ARE STORED AS CHARACTERS IN 
THE TLS AND TPS. THEY ARE ALL LESS THAN X'40" AND ARE 
TRANSLATED TO 3270 ATTRIBUTE BYTES WHEN DATA IS FORMATTED FOR 
OUTPUT TO THE DISPLAY. 


BROWSE CONTROL TABLE 


USED BY COMMON BROWSE TO REPRESENTS 8000 LOGICAL RECORDS FROM 
THE DATA SET BEING BROWSED. ONE BCT IS CREATED INITIALLY. AS 
MORE RECORDS ARE READ, ADDITIONAL BCT'S ARE ALLOCATED, 
INITIALIZED, AND CHAINED. THE PURPOSE OF THE BCT TABLES IS TO 
ALLOW COMPUTATION OF THE RELATIVE "TTRN* FOR EACH RELATIVE 
RECORD IN THE DATA SET CEVEN FOR VARIABLE BLOCKED RECORDS). 
BITS IN THE TRACK BIT TABLE AND THE RECORD BIT TABLE ARE SET 
THE FIRST TIME THAT A LOGICAL RECORD IS READ, BASED ON THE 
TTRN THAT IS RETURNED FROM CGET. ONCE A RECORD HAS BEEN READ, 
THE TABLES ARE USED TO COMPUTE A RELATIVE TTRN FOR THE RECORD. 


BROWSE LINE BUFFER 


USED BY COMMON BROWSE TO HOLD DATA FROM ONE DATA RECORD (WHICH 
CORRESPONDS TO ONE LINE ON THE DISPLAY). DATA IS MOVED FROM A 
BLB WHEN THE SCREEN IS BEING FORMATTED. BLB'S ARE GETMAINED 
FROM SUBPOOL 4 CAS A BLOCK) AND FORWARD AND BACKWARD CHAINED 
AS PART OF CBR INITILIZATION. THEY ARE FREEMAINED DURING CBR 
TERMINATION. 


BRONSE TERMINAL OUTPUT TRANSLATE TABLE 


USED BY COMMON BROWSE TO TRANSLATE DATA AS IS IS PUT IN THE 
TLS FOR DISPLAY. INVALID CHARACTERS ARE TRANSLATED TO PERIODS 
'.' BY THIS TRANSLATION. ONE BTO IS USED FOR 3277 TERMINALS 
AND A DIFFERENT BTO IS USED FOR 3278 TERMINALS. 


COMMON BROWSE TABLE 


USED TO COMMUNICATE INFORMATION BETWEEN THE PROGRAMS THAT MAKE 
UP COMMON BROWSE AND TO RETAIN INFORMATION FOR COMMON BROWSE 
BETWEEN CALLS TO IT (FOR EXAMPLE BETWEEN MEMBERS SELECTED FROM 
A MEMBER LIST). AN EXAMPLE OF THE INFORMATION SAVED IS THE 
CURRENT "FIND™ COMMAND. THE CBT IS ALLOCATED AND INITIALIZED 
BY CBS (COMMON BROWSE SETUP) EITHER BEFORE CBR CCOMMON BROWSE) 
IS CALLED, OR BY CBR ITSELF IF NECESSARY. IT IS FREED BY 

CBC CCOMMON BROWSE CLEANUP). 


COMMON VTOC INFORMATION AREA 


USED TO PASS DATA SET INFORMATION FROM CIV BACK TO ROUTINES 
WHICH CALL CIV. THE AREA IS PASSED TO CIV AS A PARAMETER. 
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CMLCENT COMMON MEMBER LIST ENTRY 


COMMON MEMBER LIST ENTRIES ARE GENERATED AND CHAINED TOGETHER 
BY CML WHENEVER A LIST OF PARTITIONED DATA SET MEMBERS IS 
NEEDED, EITHER FOR A MEMBER LIST DISPLAY, OR FOR INTERNAL 
PROCESSING. THE ENTRIES ARE CHAINED OFF OF THE TFDCML FIELD 
OF A FILE DEFINITION TABLE (TFD). THE FIRST ENTRY ON THE 
CHAIN ALWAYS CONTAINS A NAME FIELD OF BINARY ZEROS, AND THE 
LAST ENTRY ON THE CHAIN ALWAYS CONTAINS A NAME FIELD OF ALL 
BINARY ONES. EACH CHAIN ENTRY CONSISTS OF: 

- A BYTE CONTAINING STATUS BITS, 

- A POINTER TO THE NEXT ENTRY, 

- THE 8 CHARACTER MEMBER NAME 

- 3 BYTES OF TTR INFORMATION. 


EBT EDIT BACKUP TABLE 


USED IN CONTROLLING EDIT BACKUP AND RECOVERY. THE EBT IS AN 
EXTENSION TO THE EDT CEDIT TABLE?) AND IS ADDRESSED FROM THE 
EDT. 


EDL EDIT OISPLAY LINE 


USED TO DESCRIBE THE EDIT DISPLAY LINE AS IT APPEARS ON THE 
DISPLAY SCREEN, WITH THE COMMAND AREA ON THE LEFT, AND THE 
DATA AREA ON THE RIGHT. 


EDR EDIT RECORD 


USED TO HOLD CONTROL INFORMATION AND DATA FOR ONE EDIT RECORD. 
THERE IS ONE EDIT RECORD FOR EACH LINE OF DATA THAT IS BEING 
EDITED, AND FOR EACH SPECIAL LINE (SUCH AS TOP, BOTTOM, MASK, 
TABS LINES ETC.) EDIT RECORDS ARE INITIALLY ALLOCATED WHEN 
DATA IS READ IN BY EDO, AND ADDITIONAL EDIT RECORDS ARE 
ALLOCATED AS REQUIRED. EDR’S ARE FORWARD AND BACKWARD CHAINED 
ON THE EDIT RECORD CHAIN. 


EDT EDIT TABLE 


THE EDIT TABLE CEDT) IS THE MAIN COMMUNICATION AREA FOR DATA 
PASSED AMONG THE VARIOUS EDIT SUBROUTINES. IT IS DYNAMICALLY 
ALLOCATED AND INITIALIZATED BY ETS CEDIT TABLE SETUP) AND 
DELETED BY ETC CEDIT TABLE CLEANUP). IT IS ADDRESSED BY 
REGISTER 3 IN ALL EDIT ROUTINES CAND THUS DOES NOT HAVE TO BE 
PASSED AS A PARAMETER WHEN CALLING EDIT ROUTINES). 


ELC EDIT LINE COMMANDS 
USED TO DESCRIBE AN EDIT LINE COMMAND DEFINITION. THE COMMAND 
DEFINITIONS THEMSELVES ARE IN THE MODULE ETL CEDIT LINE 
COMMAND TABLE.) 

ETO EDIT TERM QUTPUT TRANS TABLE 
USED BY EDIT TO TRANSLATE DATA AS IT IS PUT INTO THE TLS FOR 
DISPLAY. INVALID CHARACTERS ARE TRANSLATED TO ATTRIBUTE BYTES 


BY THIS TRANSLATION. ONE ETO IS USED FOR 3277 TERMINALS AND A 
DIFFERENT ETO IS USED FOR 3278 TERMINALS. 
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GSc GENERIC STRING CHARACTER TABLE 


USED TO DEFINE THE BIT MASK ASSOCIATED WITH A PARTICULAR 
SPECIAL CHARACTER. THE BIT MASK IDENTIFIES THE TYPECS) OF 
CHARACTERS THAT ARE TO BE REPRESENTED BY THE SPECIAL 
CHARACTER. A CODE FROM THE GSS TABLE IS USED AS AN INDEX INTO 
THIS TABLE. THIS TABLE CONSISTS OF BIT MASKS THAT ARE MATCHED 
AGAINST BYTES IN THE GSM TO SEE IF A PARTICULAR CHARACTER FITS 
INTO A PARTICULAR CATAGORY. 


GSM GENERIC STRING MASTER TABLE 


USED TO ASSIGN TO EACH POSSIBLE CHARACTER, ONE OR MORE BITS 
WHICH DESCRIBES THE CHARACTERS. POSSIBILITIES INCLUDE ALPHA, 
NUMERIC, SPECIAL, INVALID, ETC. THE TABLE IS USED PRIMARILY 
IN PROCESSING PICTURE STRINGS IN BROWSE AND EDIT, BUT CAN BE 
USED AS A TRANSLATE TABLE TO DETERMINE WHETHER DATA CONTAINS 
INVALID OR LOWER CASE CHARACTERS CEDIT USES THE GSM FOR THIS 
FUNCTION). 


GSS GENERIC STRING SPECIAL CHAR TBL 


USED IN PROCESSING PICTURE STRINGS WITH THE TR CTRANSLATE) AND 
TRT CTRANSLATE AND TEST) INSTRUCTIONS. 

- ALL ALPHABETIC/NUMERIC CHARACTERS TRANSLATE INTO 
THEMSELVES. 

- SPECIAL PICTURE STRING CHARACTERS TRANSLATE INTO CODES 
WHICH ARE USED AS AN INDEX INTO THE GSC TABLE. IN THE 
TABLES THAT ARE DISTRIBUTED, SPECIAL CHARACTERS ARE "=", 
ahaa wen, ee aka wer, wen, wos ve ., FP AND wo 

- ALL INVALID CHARACTERS AND SPECIAL CHARACTERS THAT ARE NOT 
DEFINED AS BEING SPECIAL CHARACTERS TRANSLATE INTO X'FF’. 


KEYTBL1 KEYWORD TABLE 1 (SYSTEM) 


USED TO ASSIGN 1 BYTE INTERNAL CODES TO 1 TO 8 BYTE CHARACTER 
SYMBOLS. TABLE 1 CONTAINS SYSTEM WIDE SYMBOLS. SEE ALSO TKW. 


KEYTBL2 KEYHORD TABLE 2 CEDIT LINE) 


USED TO ASSIGN 1 BYTE INTERNAL CODES TO 1 TO 8 BYTE CHARACTER 
area ea TABLE 2 CONTAINS EDIT LINE COMMAND SYMBOLS. SEE 
ALSO TKW. 


KEYTBL3 KEYWORD TABLE 3 (PRIMARY CMD) 


USED TO ASSIGN 1 BYTE INTERNAL CODES TO 1 TO 8 BYTE CHARACTER 
SYMBOLS. TABLE 3 CONTAINS BROWSE AND EDIT PRIMARY COMMAND 
SYMBOLS. SEE ALSO TKW. 


KVBLOCK KEYHORD/VALUE BLOCK 


USED TO DESCRIBE THE KEYWORDS AND VALUES THAT ARE PROCESSED BY 
THE CKVGET AND CKVPUT COMMON SUBROUTINES. IT CONTAINS A LIST 
OF VARIABLE LENGTH ENTRIES, ONE FOR EACH KEYWORD. EACH ENTRY 
CONSISTS OF THE FOLLOWING ITEMS IN ORDER: 
VALUE LENGTH - FIXED(8) 

- KEYWORD LENGTH - FIXED(8) 

- KEYWORD —- CHARACTERCKEYWORD LENGTH) 
THE END OF THE LIST IS INDICATED BY A BYTE:‘SET TO '00'X. 
SEE ALSO TKV. 
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Loc 


LOW 


MHAF 


TAD 


Tco 


TCM 


3270 SCREEN LOCATION TRANS TBL 


USED TO ASSIST IN TRANSLATING FROM RELATIVE LOCATIONS ON A 
aoae DISPLAY SCREEN TO AN EBCDIC LOCATION AS USED IN 3270 
RDERS. 


LOWER CASE TRANSLATE TABLE 


USED TO TRANSLATE DATA THAT IS READ IN FROM THE TERMINAL. 

THE ONLY CHARACTERS ACTUALLY CHANGED BY THIS TRANSLATION ARE 
THE 3270 DUP, FIELD MARK, AND GRAPHIC ESCAPE CHARACTERS WHICH 
ARE CHANGED TO BLANK. 


MENU BUFFER 


THE MENU HANDLER BUFFER IS SET UP BY MHA AND AND IS SAVED AND 
RESTORED BY CHELP. INFORMATION IN THIS AREA IS PRESERVED 
ACROSS CALLS TO MHA. MENUACTN - (MENU ACTION ENTRY) IS A 
DSECT THAT DESCRIBES MENU HANDLER ACTION STATEMENTS IN THE MHA 
BUFFER. THERE IS ONE MHAFACTN ENTRY FOR EACH ACTION STATEMENT 


SPF DIRECTORY ENTRY 


USED TO HOLD INFORMATION THAT IS COLLECTED AND MAINTAINED BY 
SPF ABOUT A PDS MEMBER. THE SDE IS KEPT IN THE USER AREA OF A 
PARTITIONED DATA SET DIRECTORY ENTRY. 


ALLOCATED DONAME TABLE 


USED TO HOLD THE NAMES OF ALLOCATED DDNAMES. WHEN CDAIR 
ALLOCATES A FILE, THE DDNAME IS ADDED TO THE TAD, AND WHEN 
IT FREE THE FILE, THE NAME IS REMOVED. THE PURPOSE OF THE 
TABLE IS TO ALLOW FILES TO BE FREED AT TASK TERMINATION TIME 
IF THEY HAVE NOT BEEN PREVIOUSLY FREED. THIS SITUATION WILL 
OCCUR IF THE TASK TERMINATES ABNORMALLY. 


COMMAND DEFINITION TABLE 


USED TO DESCRIBE PRIMARY COMMAND USED IN BROWSE AND EDIT. THE 
COMMAND DEFINITIONS CWHICH ARE COMPILED INTO MODULES ECD - 
EDIT, AND BCD - BROWSE) ARE USED BY CCP (COMMON COMMAND PARSE) 
TO CATCH CERTAIN COMMAND SYNTAX OR PARAMETER ERRORS AND TO 
REORDER THE COMMAND PARAMETERS IN THE TCS CCOMMAND SCAN TABLE) 
SO THAT LATER PROCESSING OF THE COMMAND IS MADE EASIER. 


COMMAND TABLE 


THE COMMAND TABLE (TCM) IS USED TO DESCRIBE COMMANDS TO BE 
INVOKED UNDER SPF VIA THE COMMMON ATTACH ROUTINE (CAT). 
COMMANDS MAY BE CLASSIFIED IN ONE OF FOUR WAYS AS SPECIFIED BY 
THE TCM TYPE FIELD DESCRIBED BELOW. SPF LOOKS UP EACH COMMAND 
IN THE TCM BEFORE INVOKING THE COMMAND. ANY COMMAND NAME NOT 
FOUND IN THE TABLE WILL BE TREATED AS INDICATED BY THE FINAL 
ENTRY IN THE TCM. USE OF THE TCM IMPROVES SYSTEM PERFORMANCE 
BY ELIMINATING THE OVERHEAD OF SEARCHING LINKLIB FOR COMMANDS 
THAT ARE IN LPA AND FLAGGED AS COMMAND PROCESSORS, COMMANDS 
THAT ARE FLAGGED AS CLISTS, OR COMMANDS THAT ARE FLAGGED AS 
INVALID. IF IT IS UNKNOWN WHETHER A GIVEN COMMAND NAME IS A 
COMMAND PROCESSOR OR A CLIST, THE ENTRY MAY BE FLAGGED AS A 
"BLDL™ TYPE TO CAUSE SPF TO SEARCH THE LINKLIST USING BLDL. 
THE TCM IS ASSEMBLED AND LINKEDITED BY ITSELF. THIS MAKES IT 
POSSIBLE TO CREATE A TAILORED VERSION OF TCM FOR A SUBSET OF 
USERS, THUS RESTRICTING THE COMMANDS THAT ARE AVAILABLE TO 
THEM. THESE USERS WOULD HAVE A SEPARATE LOGON PROCEDURE WHICH 
WOULD INCLUDE A STEPLIB CONTAINING THE MODIFIED TCM. 
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TeT 


TCS 


TBS 


TFD 


TFI 


TFK 


CONTROLLER TABLES ARRAY 


THE CONTROLLER TABLES ARRAY (TCT) CONTAINS THE ADDRESSES OF 13 
TABLES THAT ARE USED BY THE CONTROLLER TASK. THESE TABLES ARE 
USED FOR TRANSLATE AND TRANSLATE-AND-TEST FUNCTIONS. THE 
FIRST FIVE TABLE ADDRESSES POINT TO THE STATIC TRANSLATE 
TABLES CTRT). SEE THE TRT OBJECT MODULE DESCRIPTION. THE 
LAST EIGHT TABLE ADDRESSES POINT TO THE TERMINAL DEPENDENT 
TABLES (TTT). SEE THE TT1 OR TT2 OBJECT MODULE DESCRIPTION. 


COMMAND SCAN TABLE 


IS CREATED BY CCS (COMMON COMMAND SCAN) IN PROCESSING BROWSE 
AND EDIT PRIMARY COMMANDS. THE TCS IS AN ARRAY OF ENTRIES, 
EACH REPRESENTING ONE PARAMETER IN THE COMMAND. 


DATA SET TABLE 


THE SPF DATA SETS TABLE CONSISTS OF POINTERS TO EIGHT SPF 
TFD'S THAT ARE USED THROUGHOUT SPF. THE TDS AND THE EIGHT 
TFD'S ALONG WITH THE DCB'S FOR THE EIGHT DATA SETS ARE ALL 
COMPILED INTO THE TSI OBJECT MODULE WHICH IS LINK EDITED INTO 
THE SPFTBLS LOAD MODULE. 


FILE DEFINITION TABLE 


USED TO COMMUNICATE FILE DEFINITION INFORMATION BETWEEN COMMON 
SUBROUTINES. SOME TFD'S ARE COMPILED. FOR EXAMPLE, THE TFD'S 
FOR THE MENUS, MSGS, PROCS AND PARMS FILES. MOST ARE CREATED 
DYNAMICALLY, INITIALIZED WITH ZEROS, AND FILLED WITH 
APPRIOPRIATE INFORMATION. TFD'S ARE PASSED TO COMMON ALLOCATE 
FOR ALLOCATING A FILE, COMMON OPEN FOR OPENING IT, COMMON GET 
TO READ A RECORD, COMMON PUT TO WRITE A RECORD, COMMON CLOSE 
TO CLOSE THE FILE, AND FINALLY COMMON FREE TO FREE THE FILE. 


FIND MEMBER TABLE 


USED TO CONTAIN BLDL INFORMATION IN MAIN MEMORY SO THAT THE 
PDS DIRECTORY ON DISK NEED NOT BE REFERENCED EACH TIME THAT A 
MEMBER IS TO BE READ. THERE IS A TFI TABLE FOR THE SPFMENUS 
DATASET, FOR THE SPFMSGS DATASET, AND FOR THE SPFPROCS 
DATASET. THE TFI IS ADDRESSED BY A FIELD IN THE TFD FOR THE 
DATA SET. A TFI TABLE IS MADE UP OF TWO BLDL LISTS (LISTS 
THAT CAN BE PASSED TO THE BLDL MACRO TO READ A PDS DIRECTORY 
ENTRY). THE FIRST LIST IS FOR ONE MEMBER, AND IS USED WHEN A 
MEMBER IS SELECTED THAT IS NOT IN THE SECOND LIST. THE SECOND 
LIST CONTAINS COMMONLY USED MEMBERS. THE FIRST TIME THAT A 
FIND IS REQUESTED (BY CALLING CFI), A BLDL IS DONE FOR THE 
SECOND LIST. THEREAFTER, WHEN A FIND IS REQUESTED, THE SECOND 
LIST IS SCANNED, AND IF THE MEMBER NAME IS FOUND, NO I/O TO 
THE DATASET DIRECTORY IS REQUIRED. IF A MEMBER IS NOT FOUND, 
FOR EXAMPLE TUTORIAL MEMBERS ARE NOT INCLUDED IN THE SECOND 
LIST, A SINGLE MEMBER BLDL IS DONE INTO THE FIRST (SINGLE 
MEMBER) LIST. 


FUNCTION KEY TABLE 


USED IN TRANSLATING FROM A 3270 ATTENTION ID, INTO AN SPF 
PROGRAM FUNCTION CODE. YHE CODE IN TURN IS USED IN 
CONJUNCTION WITH BITS IN THE TLD TO DETERMINE WHETHER OR NOT 
THE FUNCTION IS ENABLED OR NOT. 
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Ce 


TKY KEYWORD/VALUE TABLE 


THE KEYWORD/VALUE TABLE IS USED TO REMEMBER USER PARAMETERS 
DURING AN SPF SESSION. THE TKV IS SAVED IN THE SPFPARMS DATA 
SET FROM SESSION TO SESSION. FOR A NEW USER, THE TKV IS 
INITIALIZED FROM OBJECT MODULE TKV, WHICH IS IN THE SPFMAIN 
LOAD MODULE. DURING THE SESSION, TKV ENTRIES MAY BE 
RETRIEVED, UPDATED, ADDED OR DELETED VIA THE CKVGET AND CKVPUT 
COMMON SUBROUTINES. THE TKV CONSISTS OF THREE PARTS: THE 
HEADER, THE FIXED SECTION AND THE VARIABLE SECTION. ENTRIES 
IN THE FIXED SECTION ARE NEVER DELETED FROM THE TABLE. 

ENTRIES IN THE VARIABLE SECTION ARE DELETED BY CKVPUT IF THE 
VALUE BECOMES BLANK. THE MAXIMUM LENGTH OF THE TKV IS 
DETERMINED FROM THE BLKSIZE OF THE SPFPARMS DATA SET. 
INSTALLATIONS THAT REQUIRE A LARGER TKV THAN THAT SPECIFIED IN 
THE SPF INSTALLATION PROCEDURE MAY CREATE AN SPFPARMS DATA SET 
WITH A LARGER BLKSIZE. THIS MAY BE NECESSARY IF THE 
INSTALLATION ADDS ADDITIONAL KEYWORDS TO THE BACKGROUND AND 
FOREGROUND PROCS AND MENUS. 


TKW KEYNORD TABLE 


THERE ARE THREE KEYWORD TABLES, KEYTBL1, KEYTBL2, AND KEYTBL3. 
THEY ARE USED TO ASSOCIATE WORDS OF 1 TO 8 CHARACTERS WITH 
INTERNAL CODES. THEY ALLOW SPF PROGRAMS TO BE CODED 
INDEPENDENT OF ACTUAL COMMANDS AND KEYWORDS THAT ARE ENTERED 
BY AN SPF USER. THEY ALSO IMPROVE THE INTERNAL EFFICIENCY OF 
SPF SINCE A SINGLE ONE BYTE INTERNAL CODE CAN BE USED INSTEAD 
OF SEVERAL CHARACTER LITERALS. AND THEY PERMIT THE KEYWORDS 
TO BE EASILY CHANGED WITHOUT CHANGING ANY PROGRAMS. TWO 
INTERNAL PROCEDURES ARE USED TO REFERENCE ENTRIES IN THE 
KEYWORD TABLES. 

SYSCODE - IS USED TO RETRIEVE A CODE FROM A KEYWORD TABLE 

WHEN THE WORD IS KNOWN 


SYSWORD - IS USED TO RETRIEVE A WORD FROM A KEYWORD TABLE 
* WHEN ITS INTERNAL CODE IS KNOWN. 


THE KEYWORD SCHEME ALLOWS MORE THAN ONE KEYWORD TO BE 
ASSOCIATED WITH A CODE. FOR EXAMPLE, THE WORDS C, CHG, AND 
CHANGE, USED AS EDIT PRIMARY COMMANDS ALL HAVE THE SAME 
INTERNAL CODE. THE EDIT PROGRAM AFTER CALLING SYSCODE TO 
TRANSFORM THE COMMAND INTO AN INTERNAL CODE NEED ONLY CHECK 
FOR A SINGLE CODE TO DETERMINE IF ANY FORM OF THE CHANGE 
COMMAND WAS ENTERED. THE KEYWORD TABLES ARE ASSEMBLED 
TOGETHER IN THE TKW. THEY ARE ADDRESSED ONLY BY THE SYSCODE 
AND SYSWORD ROUTINES. AN ENTRY IN THE TLD CONTAINS THE 
Pearce” OF THE TKW WHICH CONTAINS THE ADDRESSES OF THE THREE 


TLD LOGICAL DISPLAY TABLE 


USED TO CONTAIN INFORMATION ASSOCIATED WITH ONE LOGICAL 
DISPLAY CAND WITH ONE OS TASK). THERE ARE TWO LOGICAL DISPLAY 
TABLES, ONE FOR EACH LOGICAL SCREEN. SOME OF THE INFORMATION 
IS PASSED BETWEEN THE CONTROLLER AND A PROCESSOR AND OTHER 
SyeeceaR = EITHER WITHIN THE CONTROLLER OR WITHIN A 
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TLS 


TPD 


TPS 


TRTO 


TRT1 


TSB 


TSC 


LOGICAL SCREEN TABLE 


THE LOGICAL SCREEN IMAGE IS A 1920, 2560 OR 3440 BYTE AREA 
THAT IS FORMATTED EXACTLY AS THE FORMAT DISPLAY IS TO APPEAR. 
WHERE ATTRIBUTE BYTES ARE TO BE LOCATED, LOGICAL SPF 
ATTRIBUTE INTERNAL CODES MUST BE USED. THE INTERNAL ATTRIBUTE 
CODES THAT ARE SUPPORTED BY SPF ARE: 

SYMBOL BINARY HEX DESCRIPTION 


—_ =e = os oe a mw eee ae a w= oP = ee oe aa eS eS | See eee eS eee ee ee ee eee eee eee ee 


TLSON - '00000100'B '04'X - OUTPUT NON-DISPLAY 

TLSOL - '00000101'B *O05'X - OUTPUT LOW INTENSITY 

TLSOH ~- '00000111'B '07"X - OQUTPUT HIGH INTENSITY 

TLSIAN - '00010000°B '10"X - INPUT ASIS NON-DISPLAY 

TLSTAL - '00010001"B "11'"X - INPUT ASIS LOW INTENSITY 
TLSTAH = '00010011'B "13'"X - INPUT ASIS HIGH INTENSITY 
TLSIBN ~- '00010100'B '"14"X - INPUT CAPS (BLANK) NON-DISPLAY 
TLSIBL - '00010101'B ‘15'X - INPUT CAPS (BLANK) LOW INTENS 
TLSIBH =~ "00010111'"B '17"X - INPUT CAPS (BLANK) HIGH INTENS 


PHYSICAL DISPLAY TABLE 


THE PHYSICAL DISPLAY TABLE CTPD) CONSISTS OF VALUES AND 
POINTERS TO OTHER TABLES THAT ARE USED IN MANAGING THE 
PHYSICAL DISPLAY. THE TPD IS COMPILED INTO THE TSI OBJECT 
MODULE WHICH IS LINK EDITED INTO LOAD MODULE SPFTBLS. 


PHYSICAL SCREEN TABLE 


THE PHYSICAL SCREEN IS AN IMAGE OF THE SCREEN THAT THE USER IS 
VIEWING. DATA IS MERGED INTO THE TPS FROM THE TLS CIN SINGLE 
SCREEN MODE, OR FROM BOTH TLS'S CIN SPLIT SCREEN MODE). 


ZEROS TRANS TABLE 


USED AS A GENERAL PURPOSE 256 BYTE TABLE INITIALIZED TO ZEROS. 
THE TRTO IS ASSOCIATED WITH A TLD AND THUS WITH A SINGLE TASK. 
IT IS USED PRIMARILY WHEN A PROGRAM WANTS TO CHANGE ONE OR A 
FEW BYTES IN THE TABLE, AND THEN DO TRT CTRANSLATE AND TEST) 
INSTRUCTIONS TO SCAN FOR PARTICULAR CHARACTERS. EACH PROGRAM 
USING THE TRTO IS RESPONSIBLE FOR RESTORING IT TO ITS INITIAL 
STATE CALL ZEROS) BEFORE CALLING OTHER PROGRAMS OR RETURNING. 


IDENTITY TRANS TABLE 


USED AS A GENERAL PURPOSE 256 BYTE TABLE. EACH BYTE CONTAINS 
ITS OWN VALUE (I.E. BYTE 0 IS X'00', BYTE 1 IS X'01", BYTE 255 
IS X'FF', ETC). THE TRT1 IS ASSOCIATED WITH A TLD AND THUS 
WITH A SINGLE TASK. IT IS USED PRIMARILY WHEN A PROGRAM WANTS 
TO TRANSLATE DATA. BYTES IN THE TABLE CAN BE CHANGED AND THEN 
TRT (TRANSLATE AND TEST) INSTRUCTIONS CAN BE DONE TO TRANSLATE 
PARTICULAR CHARACTERS TO OTHER CHARACTERS. EACH PROGRAM USING 
THE TRT1 IS RESPONSIBLE FOR RESTORING IT TO ITS INITIAL STATE 
CIDENTITY) BEFORE CALLING OTHER PROGRAMS OR RETURNING. 


TPUT/TGET SCREEN BUFFER 
TSB IS THE BUFFER USED FOR BOTH TPUT AND TGET. 


COMMON SUBROUTINE ADDRESS TABLE 


TSC IS INCLUDED IN THE SPFSUBS LOAD MODULE AND SERVES AS AN 
INTERFACE TO THE COMMON SUBROUTINES THAT ARE INCLUDED IN THAT 
LOAD MODULE. THE BEGINNING OF THE TSC SERVES AS THE ENTRY POINT 
OF THE SPFSUBS LOAD MODULE. WHEN SPFSUBS IS LOADED, ITS ENTRY 
POINT, AND THUS THE ADDRESS OF THE TSC, IS STORED IN THE TSI. 
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et. 


TSI SPF INTERFACE TABLE 


THE SPF INTERFACE TABLE (TSI) IS THE CENTRAL INTERFACE POINT 
FOR SPF. IT CONTAINS POINTERS TO OTHER SIGNIFICANT TABLES AND 
IN TURN IS POINTED AT BY THE LOGICAL DISPLAY TABLES (TLD). 

TSI IS COMPILED AS PART OF THE TSI OBJECT MODULE, AND IS LINK 
EDITED AS PART OF SPFTBLS. ITS INITIALIZATION IS COMPLETED BY 
SPF MAIN INITIALIZATION CSMI). 


TSV SPF VARIABLES TASLE 


THE SPF VARIABLES TABLE CONTAINS PARAMETERS, CODES, AND 

VARIABLES THAT ARE USED THROUGHOUT SPF. DURING SPF 

INITIALIZATION, PORTIONS OF THE TSV ARE OVERLAID WITH 

enee yeEes. FROM THE SPFPARMS DATA SET CIF A MEMBER EXISTS FOR 
bs) R). 


TTT TERM DEPENDENT TRANS TABLES 


IS AN ADDRESS ARRAY CONTAINING POINTERS TO TERMINAL DEPENDENT 
TRANSLATE TABLES. ITS ADDRESS IS OBTAINED FROM THE ENTRY 
POINT OF THE TERMINAL DEPENDENT LOAD MODULES (SPF3277,SPF3278, 
OR SPF3278C). THE ADDRESSES OF INDIVIDUAL TABLES ARE MOVED TO 
THE TCT. THEY ARE NOT REFERENCED DIRECTLY FROM THE "TTT". 


TXC SPF EXITS CONTROL TABLE 


THE TXC IS USED FOR COMMUNICATE WITH THE SPF EXIT ROUTINES 
THAT OPERATE AS PART OF SVC 93 AND SVC 94 


UDACOMM DATASET UTILITY COMMON AREA 
USED TO PASS INFORMATION BETWEEN UDA AND ITS SUBROUTINES. 


UMCCOMM MOVE/COPY UTILITY COMMON AREA 
USED TO PASS INFORMATION BETWEEN UMC AND ITS SUBROUTINES. 


UPP UPPER CASE TRANSLATE TABLE 


USED TO TRANSLATE LOWER CASE CHARACTERS TO UPPER CASE. THIS 
TABLE IS USED TO TRANSLATE DATA THAT IS READ IN FROM THE 
TERMINAL CINSTEAD OF TABLE LOW), IF THE SPF ATTRIBUTE BYTE FOR 
THE DISPLAY FIELD INDICATES THAT TRANSLATION TO UPPER CASE IS 
TO BE DONE. IN ADDITION TO TRANSLATING LOWER CASE ALPHABETIC 
CHARACTERS, THE 3270 DUP, FIELD MARK, AND GRAPHIC ESCAPE 
CHARACTERS ARE CHANGED TO BLANK. 


URSSPARM RESET UTILITY COMMON AREA 
USED TO PASS INFORMATION BETWEEN URS AND ITS SUBROUTINES. 


VAL VALID CHARACTER TRT TABLE 


USED TO DETERMINE WHETHER DATA CONTAINS CHARACTERS THAT ARE 
INVALID FOR THE TERMINAL CURRENTLY IN USE. VAL CONTAINS AN 
X'FF* IN EACH CHARACTER POSITION THAT CORRESPONDS TO AN 
INVALID CHARACTER AND X‘'00' FOR EACH VALID CHARACTER. IT CAN 
BE USED WITH THE TRANSLATE AND TEST CTRT) INSTRUCTION TO SCAN 
A CHARACTER STRING FOR AN INVALID CHARACTER. ONE VAL IS USED 
ceRNENKe AND A DIFFERENT VAL IS USED FOR 3278 
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SPF_TABLES FORMATS 


THE PAGES THAT FOLLOW CONTAIN THE FORMATS OF BLOCKS, TABLES, AND COMMON 
AREAS THAT ARE COMPLEX, OR ARE USED EXTENSIVELY IN SPF. FORMATS OF 
OTHER TABLES AND BLOCKS CAN BE FOUND IN THE PLS COMPILATION LISTINGS. 


BCT - BROWSE CONTROL TABLE 
CBT - COMMON BROWSE TABLE 
CIVCOMM - CIV COMMON AREA 

EDR - EDIT RECORD 

EDT - EDIT TABLE 

ELC - EDIT LINE COMMAND 

MHAF - MENU HANDLER BUFFER 

SDE - SPF DIRECTORY ENTRY 

TCS - COMMON COMMAND SCAN TABLE 
TCT - CONTROLLER TABLES ARRAY 
TDS - SPF DATA SETS TABLE 

TFD - FILE DEFINITION TABLE 
TFI - FIND MEMBER TABLE 

TKV - KEYRORD-VALUE TABLE 

TLD - LOGICAL DISPLAY TABLE 
TLS - LOGICAL SCREEN TABLE 
TPD - PHYSICAL DISPLAY TABLE 
TSC - SUBROUTINE COMMON TABLE 
TSI - SPF INTERFACE TABLE 

TSV - SPF VARIABLES TABLE 
UDACOMM - UDA COMMON AREA 


THE FIELD DESCRIPTIONS THAT ARE PART OF EACH DETAILED DESCRIPTION ARE IN 
THREE COLUMNS. THE COLUMNS ARE: 


OFFSET - THE NUMERIC ADDRESS OF THE FIELD RELATIVE TO THE BEGINNING 
OF THE AREA. THE FIRST NUMBER IS THE OFFSET IN DECIMAL, 
THE SECOND IS THE HEXADECIMAL EQUIVALENT. THE BIT OFFSET 
WITHIN A BYTE IS SHOWN FOLLOWING THE HEXIDECIMAL OFFSET. 


FIELD NAME - THE NAME AND FORMAT IN PLS FORMAT, AS IT WOULD APPEAR 
IN COMPILER LISTINGS. '%" INDICATES AN UNNAMED FIELD. 
THE FORMATS THAT ARE USED ARE SHOWN IN THE EXAMPLE BELOW. 


FIELD DESCRIPTION - A DESCRIPTION OR TITLE FOR THE FIELD. 


EXAMPLE OF FIELD DESCRIPTIONS: 


OFFSET FIELD FIELD 

DEC HEX NAME AND FORMAT DESCRIPTION 
0 0 1 TABLE 7% TABLE NAME */ 
0 0 2%, 7% UNNAMED GROUP OF FIELDS ¥*/ 
0 0 3 FIELDI CHAR(8), /* CHAR STRING (8 BYTES) */ 
8 & 3 FIELD2 BIT(64), /* BIT STRING (8 BYTES) %/ 
16 8 §=10 3 FIELDS FIXED(31)>, 7* FIXED NUMBER (4 BYTES) */ 
200 «14 3 FIELD@ PTR(31), /*% ADDRESS (4 BYTES) %/ 
24—os«d18 3 FIELDS £BIT(8), /* BIT STRING (1 BYTE) */ 
24 18.0 4 BIT1 BIT(1), /* 1ST BIT IN FIELD 5 */ 
24 = «18.1 & BIT? BIT(7), /* NEXT 7 BITS IN FIELD 5 */ 
25 19 3 FIELD6 PTR(249), 7* ADDRESS (3 BYTES) */ 
e8 861C 3 FIELD7 £FIXED(15)>, 7* FIXED NUMBER (2 BYTES) */ 
32s 20 3 FIELD&8 FIXED(8), 7* FIXED NUMBER (1 BYTE) %/ 
33. 2l 3 FIELD9 CHAR(*); 7% CHAR STRING (VARIABLE) */ 
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BCT - BROWSE CONTROL TABLE 
OFFSET FIELD 
DEC HEX NAME 
0 0 1 BCT BASED, 
0 0 2 BCTCNTL,> 
0 0 3 BCTNEXTP PTR(31), 
4 4 3 BCTPREVP PTR(31), 
8 8 3 BCTFS FIXED(31), 
12 C 3 BCTL# FIXED( 31), 
16 10 3 BCTLREC® FIXED(31), 
20 «614 3 BCTFTTRN>» 
200 = 14 4 BCTFTRK FIXED(15),> 
22 616 4 BCTFREC FIXED(8), 
23 17 Gq * FIXED(8)>» 
24«= 18 3 BCTLTTRN, 
240—s «18 4 BCTLTRK FIXED(15), 
260«(O1A 4 BCTLREC FIXED(8), 
27 =618 4 * FIXED(8), 
28 «61C @ BCTTTBL CHAR(1000), 
1028 404 2 BCTRTBL CHAR(1000)3; 
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FIELD 
DESCRIPTION 


/*% BROWSE CONTROL TBL 


7* 


CONTROL PART OF CNTL 
PTR TO NEXT BROWSE 
PTR TO PREV BRONRSE 


*/ 
TBL */ 
BUF */ 
BUF */ 


FIRST LINE # FOR TBL ¥*/ 


LAST LINE # FOR TB 


L %/ 


FIRST LINE OF LAST REC */ 


FIRST TTRN OF CNTL TBL ¥/ 
TRK (TT) FOR */ 

REC (R) %/ 

N = 0 ALWAYS */ 
LAST TTRN OF CNTL TBL */ 
TRK (TT) FOR %/ 

REC (R) */ 

N = 0 ALWAYS */ 

NEW TRACK BIT TABLE */ 
NEW RECORD BIT TABLE */ 


DATA AREAS 


BCT 
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CBT 
OFFSET 
DEC HEX 
0 oO 
0 oO 
0 0 
0 §6: 00.0 
0 0.7 
1 12 
1 1.0 
1 1.7 
2 2 
2 2.0 
2 2.7 
3 3 
3 3.0 
3 3.7 
4 4 
4 4 
5B 5 
& 8 
12 oC 
16 10 
20 «14 
24 «18 
28 «1c 
32. «20 
364 
40 28 
44 eC 
48 30 
52 34 
56 38 
60 3c 
64 40 
68 44 
72 «48 
76 4C 
80 50 
84 54 
88 58 
92 5C 
9% 60 
100 64 
104 68 
108 6C 
112 70 
116 74 
120 78 
124 7 
128 80 
132 84 
136 88 
140 ac 
144 90 
148 94 
152 98 
156 9% 
160 AO 
164 AG 
168 A8 
172 Ac 
176 BO 
180 B64 
184 BS 
188 8C 
192 CO 
196 C4 
322 


- COMMON BROWSE TABLE 


FYELD 
NAME 
1 CBT BASED, 
2 * BOUNDARY(WORD), 
3%, 
Gq * BIT(7)>, 
4 CBTCAPS BIT(1)>, 
3 %, 
Gq * BIT(7), 
4 CBTCOL BIT(1), 
3%, 
G * BIT(7); 
4 CBTHEX BIT(1)s; 
3%, 
G * BIT(7); 


NN NM NNN NNN NAN NNN N ANN NNYNNMN NNN NN NNN NMN NN MNNANN NN NMA ND 


4 CBTHCHAR BIT(1), 


% BOUNDARY(WORD)> 


3 CBTPADCH 


3% 
*% 
CBTBCTP 
CBTBLBP 
CBTCBLP 
CBTCBLBP 
CBTCMDP 
CBTCSRLP 
CBTERIP 
CBTER2P 
CBTERSP 
CBTERGP 
CBTER5P 
CBTER6P 
CBTER7P 
CBTER8P 
CBTERSP 
CBTGETLP 
CBTIOAP 
CBTLBCTP 
CBTCSRP 
CBTTFOP 
CBTTLSP 
*% 

*% 

* 
CBTBCTSZ 
CBTCNDSZ 
CBTCSR# 
CBTCSROS 
CBTCTRK 
CBTCREC 
CBTCNUM 
CBTDUPD 
CBTEOF# 
CBTERCOD 
CBTFDS 
CBTFIO# 
CBTGET# 
CBTHIGH#? 
CBTICDIM 
CBTIOX 
CBTLRECL 
CBTLD# 
CBTLEFTC 
CBTLIO# 
CBTPCSR 
CBTSTRCT 
CBTLINCT 


PTR(31), 
PTR(31), 
PTR( 31), 
PTR(31), 
PTR(31),; 
PTR(31)> 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR( 31); 
PTR(31), 
PTR( 31); 
PTR(31); 
PTR(31), 
PTR(31), 
PTR(31);, 
PTR(31),; 
PTR(31); 
PTR(31), 
PTR( 31); 
PTR( 31); 
PTR(31), 
PTR(31)>, 
FIXED(31), 
FIXED(31)> 
FIXED(31), 
FIXED(31)>, 
FIXED(31)> 
FIXED(31)>, 
FIXED(31), 
FIXED( 31), 
FIXED(31), 
FIXED(31)>, 
FIXED(31)> 
FIXED(31)> 
FIXED(31)>, 
FIXED( 31), 
FIXED(31), 
FIXED(31), 
FIXED(31)>, 
FIXED(31)>, 
FIXED(31), 
FIXED(31), 
FIXED(31)> 
FIXED( 31), 
FIXED(31)>, 


FIXED(8), 
BIT(24), 


/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
7* 
/* 
7* 
/* 
/* 
/* 
/*® 
/*® 
/* 
7* 
7*® 
/* 
7* 
7* 
7*® 
7* 
7* 
/* 
/* 
7* 
/*® 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/*® 
/* 
/*® 
/* 
/* 
/* 
/* 
/® 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
7* 
/* 
/* 
/* 
/* 


FIELD 
DESCRIPTION 
*/ 
#/ 
CAPS/ASIS BYTE(BIT) %/ 
ON —> CAPS MODE */ 
OFF -> ASIS MODE */ 
COLS BYTE(BIT) %/ 
ON —> COLS %/ 
OFF —> NOCOLS */ 
HEX BYTE(BIT) */ 
ON —> HEX */ 
OFF —> NOHEX %/ 
HEX CHAR FORMAT BYTE(BIT) */ 
ON —> HEX CHARS FORMAT */ 
OFF -> HEX DATA FORMAT */ 
/ 
PAD CHAR FOR SHORT RECS  ¥*/ 
#% RESERVED 2% */ 
¥#% RESERVED 3% %/ 
BCT PTR %/ 
BLB PTR */ 
FIRST CBL PTR */ 
CURRENT BLB PTR %/ 
COMMAND INPUT PTR / 
CURSOR LINE BUFF (BLB) PTR*¥/ 
ERROR 1 PARM PTR */ 
ERROR 2 PARM PTR %/ 
ERROR 3 PARM PTR %/ 
ERROR 4 PARM PTR %/ 
ERROR 5 PARM PTR */ 
ERROR 6 PARM PTR */ 
ERROR 7 PARM PTR %/ 
ERROR & PARM PTR */ 
ERROR 9 PARM PTR */ 
GET LINE BUFF (BLB) PTR */ 
I/O ARRAY PTR %/ 
LAST BCT PTR */ 
CURSOR POINTER / 
TFD PTR */ 
TLS PTR %/ 
¥% RESERVED %/ 
¥% RESERVED 3 %/ 
*% RESERVED 3 %/ 
BCT SIZE #/ 
COMMAND INPUT SIZE (LINE2 )*/ 
CURSOR (LINE) NUMBER */ 
CURSOR OFFSET %/ 
CURRENT TRACK / 
CURRENT RECORD */ 
CURRENT NUMBER */ 
DISPLAY UNITS / DISPLAY ¥*/ 
LINE NUMB OF EOF */ 
ERROR CODE %/ 
FIRST DISPLAY LINE NUMB #/ 
FIRST I/O ARRAY LINE NUMS */ 
GET REQUEST LINE NUMB %/ 
HIGHEST LINE # READ */ 
I/O ARRAY DIMENSION */ 
I/O ARRAY INDEX */ 
LRECL (OF DATA SET) */ 
LAST DISPLAYED LINE # */ 
LEFT (DISPLAY) COLUMN %/ 
LAST I/Q ARRAY LINE NUMB */ 
PREVIOUS CSR PTR */ 
STRING COUNT (FIND ALL) #7 
LINE COUNT (FIND ALL) %/ 


(CONTINUED ON NEXT PAGE) 
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< 


~C 


CBT 


OFFSET 


DEC 
200 
204 
208 
212 
216 
220 
222 
224 
224 
228 
232 
236 
246 
244 
248 
248 
252 
256 
260 
264 
264 
456 
456 
456 
456 
456 
456 
457 
457 
457 
457 
457 
458 
459 
460 
468 
476 
478 
480 
482 
462 
482 
482 
482 
482 
483 
484 
484 
524 
570 
616 
616 
618 
619 
620 
621 
621 
621 
621 
621 
621 
621 
621 
622 
630 
631 
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HEX 


260.0 
26D.1 
26D .2 
260.3 
26D .4 
260.5 
26D .6 
26E 
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- COMMON BROWSE TABLE (CONTINUED ) 


FIELD 


NM MM P— MH TY PP 


2 


NAME 


CS8TSCNCT 
CBTRDCNT 
CBTSCSRB 
CBTCMCOD 
CBTPL# 

CBTLBACT 


FIXED(31), 
FIXED(31); 
FIXED(31), 
FIXED(31), 
FIXED(31), 
FIXED(15), 


CBTRBACT FIXED(15), 


CBTSCROL>» 
3 CBTSCURL 
3 CBTSHAXL 
3 CBTSPLEN 
3 CBTSCURC 
3 CBTSMAXC 
3 CBTSPCOL 
CBTTCS, 

% 


&* KK K 


FIXED(31), 
FIXED(31), 
FIXED( 31), 
FIXED( 31), 
FIXED(31), 
FIXED(31), 


PTR(31), 
FIXED(31), 
FIXED( 31), 
PTR(31); 
(12); 


CHAR(16), 


CBTCSTAT, 
4 CBTFCTOP 
4 CBTFCBOT 
4 CBTCFND 
G % 
CBTPSTAT, 
4 CBTFPTOP 


BIT(1), 
BIT(1), 
BIT(1), 
BIT(5), 


BIT(1), 


4 CBTFPBOT BIT(1), 


4 CBTPFND 


4G * 
CBTDIR 
CBTTYP 
CBTDIRW 
CBTTYPW 
CBTLB 
CBTRB 
CBTSTRSZ 
CBTSTRST 


Ut Of OT OF OF UF UF Ol 


BIT(1), 

BIT(5), 
FIXED(8), 
FIXED(8), 
CHAR(8); 
CHAR(8), 
FIXED(15) 
FIXED(15) 
FIXED(15); 
BIT(8), 


4 CBISTRF BIT(1), 
4 CBTHEXF BIT(1), 
4 CBTPICTF BIT(1), 
4 CBTTEXTF BIT(1), 


Gq * 
3% 
3%, 

4 CBTSTR 


CBTTTRNs 

3 CBITT 

3 CBTR 

3 CBITN 
CBTSPNUM 
BIT(8), 
CBTCSRFG 
CBTDBOT 
CBTEOF 
CBTPCFS 
CBTLIST 
CBTTRKOF 
* 


Ul Ol Uf Of Uf Ul UL X 


BIT(4), 
BIT(8)>, 


CHAR(40), 
4 CBTSTRIA CHAR(46), 
& CBTSTROA CHAR(46), 


FIXED(15); 
FIXED(8), 
FIXED(8), 
FIXED(8), 


BIT(1), 


BIT(1); 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(2)>, 


CBTENBL CHAR(8), 
CBTPCCOD CHAR(1); 


* CHAR(23)5 


7* 
7* 
7* 
7* 
/* 
7* 
7* 
7* 
7* 
7*® 
/* 
7* 
7* 
7* 
7*® 
/* 
/* 
7* 
7*® 
7* 
7* 
/* 
7* 
7% 
/* 
7*® 
7* 
/* 
/* 
/* 
/* 
/* 
7% 
7* 
7* 
7% 
/* 
/* 
/* 
7% 
7*® 
7*® 
7* 
/* 
7*® 
7* 
(* 
7* 
7* 
/* 
7% 
/* 
7% 
7* 
/* 
7*® 
/* 
7* 
7*® 
/* 
/*® 
/* 
/* 
/* 
7* 
/* 


FIELD 
DESCRIPTION 


SCAN COUNT (FIND ALL) 


WORD CNT FOR INPUT SCAN 


SCROLL CURSOR BACKUP 
CONFIRMATION MSG CODE 
PREVIOUS LABEL NUMBER 
LEFT BOUND ACTUAL 
RIGHT BOUND ACTUAL 


SCROLL PARMS (FOR CSCROLL)*/ 


CURRENT LINE NUMBER 


MAXIMUM LINE NUMBER 


PAGE LENGTH (NO. LINES) 
CURRENT COL NUMBER 
MAXIMUM COLUMN NUMBER 


PAGE WIDTH (NO. COLUMNS) 
TCS (CMD SCAN) INTERFACE 


COMMAND INPUT PTR 
COMMAND INPUT SIZE 
COMMAND INPUT SIZE 
TCD ENTRY PTR 

INPUT PARM WORD ARRAY 
TCSNOS ENTRY 


CURRENT STATUS 
FIND — TOP OF DATA 


FIND — BOTTOM OF DATA 
CURR TIME STR FOUND 


% RESERVED 
PREVIOUS STATUS 
FIND — TOP OF DATA 


FIND — BOTTOM OF DATA 


PREV TIME STR FOUND 
* RESERVED 

FIND DIRECTION 

FIND TYPE 

FIND DIRECTION 

FIND TYPE 

LEFT BOUND 

RIGHT BOUND 

FIND STRING SIZE 

FIND STRING STATUS 
STRING IS DEFINED 


STRING IS HEX FLAG 
STRING IS PICT FLAG 
STRING IS TEXT FLAG 


**% RESERVED 2 
FIND STRINGS 
USED BY FIND CMD 
INPUT FORMAT 
OUTPUT FORMAT 
TTRN FROM CGET 
TRACK 
RECORD 
NUMB 
BROWSE SUBPOOL NUMBER 


CURSOR SET FLAG 


DISPLAY - BOTTOM OF DATA 


PRIMARY COMMAND FLAG BIT 


%/ 
%/ 
%/ 
%/ 
%/ 
%/ 
%/ 
%/ 
%/ 
%/ 
*/ 
%/ 
%/ 
*/ 
%/ 
%/ 


*/ 


LISTING (FBA,FBM) FLAG BIT*/ 


TRACK OVERFLOW CONDITION */ 
*/ 
*/ 
PRIMARY COMMAND CODE %/ 
%%* RESERVED *%* */ 


DATA AREAS 


CBT 
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CIVCOMM - CIV COMMON AREA CIVCOMM 


OFFSET FIELD FIELD 
DEC HEX NAME DESCRIPTION 
0 0 1 CIVCOMM BASED BDY(WORD), /* #/ 
0 0 2 CIVCNRX FIXED(31), /* NUMBER OF EXTENTS */ 
4 4 @ CIVCNRXU FIXED(31), /* NUMBER OF EXTENTS IN USE */ 
8 8 2 CIVCTOTQ FIXED(31), /* TOTAL SPACE QUAN %/ 
12 Cc 2 CIVCTOTU FIXED(31)>, 7* TOTAL SPACE USED */ 
16 10 2 CIVCNRBU FIXED(31), 7% NUMBER OF USED DIR BLKS- ¥*/ 
200 lsd14 2 CIVCNRM FIXED(31), /7* NUMBER OF MEMBERS %/ 
e@ 8618 2 CIVCSPCL FIXED(31)>, 7% LEN OF WORD IN CIVCSPCU  ¥*/ 
26 81C 2 CIVCDSOB BIT(16), 7* DSORG DSCB BITS %/ 
26 1€.0 3 CIVCIS BIT(1), 7* INDEX SEQUENTIAL */ 
2&8 1C.1 3 CIVCPS BIT(1), 7% PHYSICAL SEQUENTIAL %/ 
28 1C.2 3 CrIvcDO BIT(1), /* DIRECT %/ 
28 8=61C€.3 3 * BIT(3)> 7% **% UNREFERENCED 33% */ 
e8 1C€.6 3 CIVCPO BIT(1), 7%  PARTITIONED */ 
26 1C.7 3 CIVCUM BIT(1), 7%  UNMOVABLE %/ 
29 =6.1D.0 3 * BIT(4)> /* *%% UNREFERENCED 3% */ 
290 s«1D.4% 3 CIVCVS BIT(1), /*% VSAM */ 
eo =—s-.1D.5 3 * BIT(3), /* OTHER — 3-UNOPENED PS */ 
/* 7-SYSCTLG */ 
30 ~=Co1E 2 CIVCRECB BIT(8), 7* RECFM DSCB BITS */ 
30 1E.9 3 CIVCRFTP BIT(2)>, 7% RECORD FORMAT TYPE %/ 
30 1E.2 3 CIVCRFT BIT(1); 7* TRACK OVERFLOW */ 
30 1E.3 3 CIVCRFB BIT(1), 7* BLOCKED */ 
30 8 =61E.4% 3 CIVCRFS BIT(1)>, 7* STANDARD OR SPANNED %/ 
30 )=—«1E.5 3 CIVCRFCL BIT(2), 7* PRINT CONTROL TYPE */ 
30 8«=61E.7 3 * BIT(1L)>, /*& **% UNREFERENCED 336% */ 
31 0OLF 2 CIVCFLGS BIT(8), /* FLAGS */ 
31 1F.0 3 CIVCLOAD BIT(1), /* LOAD MODULE DATASET %/ 
31 1F.1 3 CIVCSPF BIT(1)> 7% SPF STATS IN ONE MEMBER */ 
31 =F ..2 3 CIVCSUL BIT(1); /7* USER LABEL DATASET */ 
3L 0 OF ..3 3 # BIT(5), 7% *% RESERVED x */ 
320 20 @e CIVCDSO CHAR(8), /* DSORG */ 
40 28 2 CIVCCD CHAR(S8), 7* CREATION DATE %/ 
48 30 2 CIVCED CHAR(8), 7* EXPIRATION DATE */ 
56 8§=638 2 CIVCOPTJ CHAR(1); 7% OPTCD (J OR BLANK) %/ 
57 39 2 % CHAR(3)> 7* *#% RESERVED 3 */ 
60 3C 2 * CHAR( 8); 7% *% RESERVED */ 
68 44 2 CIVCALOC , /* ALLOC TKV PARMS */ 
68 44 3 CIVCVOL CHAR(6);, 7% VOLUME SERIAL */ 
74 GA 3 CIVCSPCU CHAR(8), 7% SPACE UNIT: 'CYLINDER', */7 
/* "BLOCK '‘, OR "TRACK "*/ 
82 52 3 CIVCRECF CHAR(6), 7% RECORD FORMAT */ 
8&8 58 3 CIVCBLK FIXED(15), 7% BLOCK SIZE %/ 
9055 A 3 CIVCLREC FIXED(15); /* LRECL */ 
92. BC 3 CIVCEXTL FIXED(31), /* SIZE OF FIRST EXTENT */ 
96 §660 3 CIVCSECQ FIXED(31), 7% SECONDARY QUANTITY */ 
100 64 3 CIVCNRB FIXED(31);5 7% NUMBER OF DIR BLKS %/ 
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> 


; EDR - EDIT RECORD 
OFFSET FIELD 
DEC HEX NAME 
0 0 1 EDR BASED, 
0 0 2 EDRBASE,; 
0 0 3 EDRNEXTP PTR(31), 
G 4 3 EDRPREVP PTR(31)> 
8 8 3 EDRALTCT; 
8 8 q * BIT(8), 
8 8.0 5 EDRXCLUD BIT(1), 
8 8.1 5 EDRCMD BIT(1), 
8 8.2 5 * BIT(6)> 
9 9 4 EDRALTP PTR( 24), 
12 Cc 3 EDRNUMB FIXED(32);, 
16 19 3 EDRCNTL> 
16 10 4 EDRSPECL FIXED(8), 
17 #Oill 4 EDRSOURC BIT(8), 
17. 11.0 5 EDRORIG BIT(1); 
17. lel 5 EDRIMOVE BIT(1}, 
17. 11.2 5 EDRICOPY BIT(1); 
17. 11.3 5 EDREMOVE BIT(1), 
17. 11.4 5 EDRECOPY BIT(1); 
17. 11.5 5 EDRTEXTI BIT(1}, 
17. 11.6 5 EDRTYPEI BIT(1), 
17. +=11.7 5 * BIT(1), 
18 12 4 EDRGEN BIT(8), 
18 12.0 5 EDRTOP BIT(1), 
18 12.1 5 EDRBOT BIT(1), 
18 12.2 5 EDRSTD BIT(1), 
18 12.3 5 EDRTEMP BIT(1)> 
: 18 12.4 5 EDRLDINT BIT(1), 
ed 18 12.5 5 EDRLDPRO BIT(1); 
j 18 12.6 5 EDRNOTAB BIT(1), 
; 18 12.7 5 EDRLCPRO BIT(1), 
19 13 4 EDRCHGST BIT(8), 
19 13.0 5 EDRCHG BIT(1), 
19 -:113.1 5 EDRTYPED BIT(1), 
19 13.2 5 EDRCHGED BIT(1), 
19 13.3 5 EDRSCOLS BIT(1), 
19 13.4 5 EDRSDATA BIT(1), 
19 «13.5 5 EDRTEXTC BIT(1);, 
19 13.6 5 * BIT(1), 
19 13.7 5 EDRRENUM BIT(1);, 
20 «#414 2 EDRDATA CHAR(*); 


EDRALT ~ EDIT RECORD ALTERNATE 


OFFSET FIELD 
DEC HEX NAME 

0 0 

0 0 2 EDRXLP 

4 4 2 EDRXFP 

8 i) 2 EDRXCNT 
12 c 2 EDRCAREA 
18 12 2 EDRCNAME 
24.—C «18 2 EDRCSUFF 
26 1c 2 EDRCELCP 
32. 28 2 EDRCMDNP 
360 0=— 24 2 EDRCMDPP 


1 EDRALT BASED CEDRALTP), 


PTR(31), 
PTR(31), 
FIXED(31)>, 
CHAR(6), 
CHAR(6), 
FIXED(31)> 
PTR(31), 
PTR(31), 
PTR(31); 
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[* 
/* 
/* 
/* 
/* 
/* 
/* 
7* 
7* 
/* 
/* 
7*® 
7* 
7* 
/* 
7* 
/* 
7* 
/* 
/* 
/* 
/* 
(* 
7* 
7* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
7*® 
/* 
/* 
/* 
/* 


7*® 
7*® 
/* 
7* 
7*® 
/* 
7* 
/* 
/* 
/* 


FIELD 

DESCRIPTION 
EDIT LINE CONTROL */ 
BASE PART OF EDR */ 
NEXT EDR PTR */ 
PREV EDR PTR %/ 
ALTERNATE AREA CONTROL */ 
TYPE OF RECORD */ 
PTR IN EDRXFP/EDRXLP */ 
CMD IN EDRCAREA */ 
*% RESERVED ** */ 
ALTERNATE AREA PTR */ 
INTERNAL ASCENDING NUMB */ 
*/ 
SPECIAL RECORD INDEX */ 
SOURCE OF RECORD */ 
ORIGINAL */ 
INTERNAL MOVE */ 
INTERNAL COPY/REPEAT */ 
EXTERNAL MOVE */ 
EXTERNAL COPY */ 
TEXT INSERTED %/ 
TYPED INSERTED %/ 
%% RESERVED %* */ 
GENERAL AND DISPL FLAGS */ 
TOP (RECORD) */ 
BOTTOM (RECORD) */ 
STANDARD (RECORD) */ 
TEMPORARY (RECORD) */ 
LINE DATA INTENSIFY ¥*/ 
LINE DATA PROTECTED ¥*/ 
NO TABS C(ATTR BYTES) ¥*/ 
LINE CMD PROTECTED */ 
RECORD CHANGED STATUS ¥*/ 
CHANGED */ 
DATA OVERTYPED */ 
CMD CHG OR OVERLAY CHG*/ 
COLUMNS SHIFTED */ 
DATA SHIFTED */ 
TEXT CHANGE */ 
%% RESERVED 2 */ 
LINE RENUMBERED %/ 
RECORD DATA */ 

FIELD 

DESCRIPTION 
ALT EDR AREA (IF X | CMD)#/ 
PTR TO LAST X'ED OF BLK*/ 
PTR TO 1ST X'ED OF BLK */ 
CNT OF X'ED IN BLOCK ¥*/ 
CMD AREA */ 
CMD NAME */ 
CMD SUFFIX */ 
LINE COMMAND PTR */ 
PTR TO NEXT CMD EDR */ 
PTR TO PREV CMD EDR */ 


DATA AREAS 


EDR 
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EDT - EDIT TABLE 
OFFSET FIELD FIELD 
DEC HEX NAME DESCRIPTION 
0 0 l EDT BASED, 7* EDIT TABLE */ 
7% — EDTSDCLS */ 
0 0 2 EDTTLDOP POINTER(31)>, 7* PTR TO TLO (LOGICAL DISPL }¥/ 
4 4 2 EDTEDTP POINTER( 31), 7% PTR TO EDT (EDIT TABLE) ¥*/ 
8 8 2 EDTPTRL POINTER(31);, 7* PTR FOR EXIT ROUTINES */ 
12 Cc 2 EDTPTR2 POINTER(31); 7% PTR FOR EXIT ROUTINES */ 
16 10 2 EDTTOPP POINTER( 31); /* PTR TO TOP EDR */ 
20 14 2 EDTBOTP POINTER(31); 7% PTR TO BOTTOM EDR %/ 
24—fss«d18 2 EDTEOROP POINTER(31)>, 7% PTR TO EDRDATA OFFSET */ 
e8 «61C 2 EDTLRECP POINTER(31), 7% PTR TO EDRDATA LENGTH */ 
32 = 20 2 EDTERCDP POINTER( 31), 7% PTR TO ERROR CODE KORD */ 
360 a4 2 EDTMGCOP POINTER(31); 7* PTR TO MSG CODE WORD */ 
40 28 2 EDTOSNSP POINTER(31)>, 7* PTR TO D.S NAME STRUCT */ 
44 2c 2 EDTMEMBP POINTER( 31), 7% PTR TO MEMBER NAME %/ 
48 30 2 EDTSDEP POINTER(31), 7* PTR TO SPF DIR ENTRY (CIN) */ 
52 34 2 EDTBLDLP POINTER( 31), 7% PTR TO BLDL AREA (OUT) */ 
56 838 2 EDTIDTTP POINTER(31), 7% PTR TO IN/DATA TRANS TBL */ 
60 3C 2 EDTODTTP POINTER( 31), 7* PTR TO OUT/DATA TRANS TBL */ 
64 40 2 EDTITTP POINTER(31), 7% PTR TO IN/TERM TRANS TBL */ 
68 44 2 EDTOTTP POINTER(31)>, 7* PTR TO OUT/TERM TRANS TBL */ 
72 838648 2 EDTITFDP POINTER(31)>, 7% PTR TO PRIM INPUT TFD */ 
76 8 84C e EDTOTFDP POINTER( 31), 7* PTR TO PRIM OUTPUT TFO */ 
80 =—s« 50 2 EDTCTFDP POINTER(31), 7* PTR TO COPY INPUT TFD */ 
8& 54 2 EDTRTFDP POINTER( 31), 7* PTR TO REPL OUTPUT TFD */ 
88 58 2 EDTFREEP POINTER( 31), 7* PTR TO FREE CHAIN EDR'S~ */ 
92.5 2 EDTDELP POINTER(31), 7* PTR TO DELETE CHAIN EDR'S */ 
96 8660 2 EDTMASKP POINTER(31)> 7* PTR TO MASK LINE %/ 
100 64 2 EDTTABSP POINTER(31), 7* PTR TO TABS LINE %*/ 
104 8§=668 2 EDTXMSGP POINTER(31)> 7* PTR TO ‘EXCLUDE’ LINE MSG */ 
108 6C 2 EDTHEADP POINTER( 31), 7* PTR TO 2 LINE HEADER */ 
ll2 = =70 2 # CHARACTER( 16), /* EXTRA SPACE %/ 
= 0S —EeeEe—eeeeeeeeeeeeee ee — " / 
128 80 2 EOTEBTP POINTER( 31), 7* BACKUP TABLE POINTER %*/ 
132 84 2 EDTB BIT(8), 7* BACKUP FLAGS %/ 
132 84.0 3 EDTBINIT BIT(1), /* BACKUP INITIALIZED */ 
1320s 84.1 3 EDTBST BIT(1)>, 7% BACKUP STARTED %/ 
132 84.2 3 EOTBERR BIT(1); /* BKUP/RCVR ERROR %/ 
132 84.3 3 BIT(1)> /* */ 
132 84.4% 3 EDTBR BIT(1); /* RECOVERY IN PROGRESS ¥*/ 
132 884.5 3% BIT(3), /* */ 
133 85 2 EOTBCODE CHARACTER(1), /7* EBS BACKUP FUNCTION CODE*/ 
134 =: 86 2 EDTBSUSC CHARACTER(1)> 7* EBS SUSPEND CODE */ 
135 8&7 2 * CHARACTER(1)> /*%# %*% RESERVED */ 
136 = 88 2 EDTEBUSZ FIXED(31), 7% BACKUP DATASET BLKSIZE ¥*/ 
140 8=— 8&C 2 * CHARACTER( 20), 7% EXTRA SPACE FOR BACKUP ¥*/ 
OS OS Se eZ 
/* LINE COMMAND VARIABLES */ 
160 8 AO 2 EDABSUF FIXED(31), 7*  AFTER/BEFORE SUFFIX */ 
164 AG 2 EDCNOCNT FIXED(31), 7% COMMAND COUNT */ 
168 A8& 2 EOSUFFIX FIXED(31), 7% SUFFIX FROM LINE CMD %/ 
172 = =AC 2 EDFBSUF FIXED(31), /* FIRST OF BLOCK — SUFFIX */ 
176 = BO 2 EDCNAME CHARACTER(6)>, 7* COMMAND NAME / 
182 + Bé 2 EDFBCODE FIXED(8), 7% FIRST OF BLOCK —- CODE ¥*/ 
183 B? 2 % CHARACTER(1)> 7% *% RESERVED 23 */ 
18¢ B8& 2 # CHARACTER(16), /*% *% RESERVED 3% */ 
7* PRIMARY COMMAND VARIABLES %/ 
200 «=€6Cc8 2 EDEPCP POINTER(31), 7% EPC (PRIM CMD DEF) PTR */ 
204 8CC 2 EDTTCS, 7* TCS (CMD SCAN ARRAY) */ 
204 =6CC 3 # POINTER(31)> /*% PTR TO COMMAND INPUT < */ 
208 DO 3 POINTER( 31), 7% SIZE OF CONMAND INPUT -—~*/ 
212 D4 3 * FIXED(31),; 7% PRIMARY CMD WORD COUNT—*/ 
216 «= 3 * POINTER(31)> 7% PTR TO TCD ENTRY — */ 
220 8 8©60C 3 (12), 7% PRIMARY CMD WORDS( ARRAY )*/7— 
220 DC 4 * CHARACTER(16), /* ARRAY (TCSKDS ENTRIES )¥/ 
412 19C 2 EDPCCODE FIXED(31), 7% PRIMARY COMMAND ERR t/ 


(CONTINUED ON NEXT PAGE) 
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{ 
( 


EDT 


OFFSET 


DEC HEX 


416 1A0 
420 1A4% 
424 148 
428 l1AC 
432 180 
433 161 
436 1B4¢ 


448 1C€0 
452 1C4 
456 1C8 
460 1CC 
464 100 
468 104 
472 1D8 


472 108.0 
472 1D8.1 


476 1DC 


480 1E£0 
484 1E4 
488 1E8 
492 1€EC 
496 1F0 
500 1F4 
504 1F8& 
505 1F9 
508 1FC 


528 210 


528 210.0 
528 210.1 
528 210.2 


529 2ll 


B29 211.0 
529 211.1 
529 211.2 
529 211.3 
529 211.4 
529 211.5 
529 211.6 


530 212 
532 214 
536 218 
540 21C 
544 220 
548 224 
552 228 
556 2eC 
560 230 
561 231 
562 232 
563 233 
564 234 
572 23C 
580 244 
588 24C 
592 250 
596 254 
600 258 
604 25C 
608 260 
624 270 
640 280 
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- EDIT TABLE C CONTINUED ) 


FIELD FIELD 
NAME DESCRIPTION 
2 EDPCCSRP PTR(31)> /* CODE, CURSOR POSITION */ 
2 EDPCERIP PTR(31), (* " AND ERROR PARM PTRS */ 
2 EDPCER2P PTR(31); (* *" PASSED FROM EPI TO */ 
2 EDPCER3P PTR(31), /* "_EPF %/ 
2 EDTPCMD CHARACTER(1), /* EDIT PRIMARY COMMAND %/ 
2 * CHARACTER(3)>, 7% **% RESERVED ** */ 
2 CHARACTER(12)5 7*% EXTRA SPACE */ 
/% —- EDTDDCLS %/ 
7* CURSOR FIELDS %/ 
2 EDCSRCO FIXED(31), 7* CSR (LINE) CMD OFFSET */ 
2 EDCSRDO FIXED(31); 7* CSR (LINE) DATA OFFSET */ 
2 EDCSRREL FIXED(31); 7% CURSOR REL LINE (0 | 1) */ 
2 EDCSRRO FIXED(31)> /* CSR (CEDRDATA) REC OFFSET*/ 
2 EDPCSR FIXED(31), 7* PREVIOUS CURSOR LOCATION*®/ 
2 EDTCSRP POINTER(31), 7% CURSOR POINTER */ 
2 BIT(32), 7% *% RESERVED ¥# */ 
3 EDTCSRFC BIT(1), /* CSR SET BY FIND/CHG */ 
3 BIT(31); /* *% RESERVED 2 */ 
2 EDTCSRTX FIXED(31), 7% CURSOR TEXT OFFSET */ 
7* DISPLAY FIELDS */ 
2 EDFEDLP POINTER(31)> 7* FIRST EDIT LINE POINTER */ 
2 EDRELNUM FIXED(31), 7* REL NUM OF 15ST DISPL EDR*/ 
2 EDNAXLNS FIXED(31), /* MAX (DISPLAY) LINES */ 
2 EDCURLNS FIXED(31), 7* CURR LINES (ON SCREEN) */7 
2 EDTPSLNS FIXED(31), 7% LINES ON TPS (NOT HDR) */ 
2 EDINSCNT FIXED(31)> 7* INSERT LINE COUNT */ 
2 EDTRDHDR CHAR(1), 7%  REDISPLAY HEADER Y | N ¥*/ 
2 * CHAR(3), 7%  REDISPLAY HEADER Y | N */ 
2 * CHARACTER( 20), 7* EXTRA SPACE %/ 
/* —~ EDTFDCLS */ 
2 * BIT(8), /* FIND/CHG STATUS BITS */ 
3 EDFCCHG BIT(1)> 7* CHG CMD LAST ACTION */ 
3 EDFCFIND BIT(1), /* FIND CMD LAST ACTION*/ 
3 * BIT(6), 7* *% RESERVED ** */ 
2 EDFCSBIT BIT(8), 7% STRING BITS */ 
3 EDFCS1IF BIT(1); /* ON —> STRING 1 DEFINED */ 
3 EDFCX1F BIT(1), 7* ON —> STRING 1 IS HEX */ 
3 EDFCPIF BIT(1), 7* ON —> STRING 1 IS PICT */ 
3 EDFCTIF BIT(1); /* ON -> STRING 1 IS TEXT */ 
3 EOFCS2F BIT(1), 7* ON —> STRING 2 DEFINED */ 
3 EDFCX2F BIT(1), /* ON -> STRING 2 IS HEX */ 
3 * BIT(2), /* *% = RESERVED #3 %/ 
2 * CHAR(2), /*% *#% RESERVED ** */ 
@ EDFCS1P POINTER(31), 7*  STR1 PTR %/ 
2 EDFCS15Z FIXED(31), 7* STR SIZE */ 
2 EDFCSIIP POINTER(31), 7%  STR1 INPUT AREA PTR */ 
2 EDFCS1OP POINTER(31); 7%  $STR1 OUTPUT AREA PTR %/ 
2 EDFCS2P POINTER(31)> 7%  STR2 PTR */ 
2 EDFCS2SZ FIXED(31), 7* STR2 SIZE */ 
2 EDFCS2IP POINTER( 31), 7*  $STR2 INPUT AREA PTR */ 
2 EDFCDIR FIXED(8), 7% F/C DIRECTION KEY CODE */ 
2 EDFCLMT FIXED(8), 7%  F/C LIMIT KEY CODE %/ 
2 EDFCTYP FIXED(8), 7*% F/C TYPE KEY CODE */ 
a % FIXED(8); 7* *% RESERVED i %/ 
2 EDFCDIRW CHARACTER(8), 7* F/C DIRECTION KEY WORD */ 
2 EDFCLMTW CHARACTER(8), 7*® F/C LIMIT KEY WORD */ 
2 EDFCTYPW CHARACTER(S), /*  F/C TYPE KEY KORD */ 
2 EDFCLBU FIXED(31), 7*  F/C LEFT BOUND USED */ 
2 EDFCRBU FIXED(31), 7* F/C RIGHT BOUND USED */ 
2 EDFCLB FIXED(31)>, 7*® F/C LEFT BOUND (ENTERED )*/ 
2 EDFCRB FIXED(31), 7* F/C RIGHT BOUND C") = #7 
2 EDFCPCRO FIXED(31), 7*  F/C PREV CSR OFFSET */ 
2 EODFCLNS (4) FIXED(31), 7* F/C LINE COUNTERS */ 
2 EDFCSTRS (4) FIXED(31), 7%  F/C STRINGS COUNTERS */ 
2 * CHARACTER(16), /7* EXTRA SPACE */ 


(CONTINUED ON NEXT PAGE) 
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7% 
/* 
/* 
7% 
(* 
7% 
7¥* 


/¥* 


7% - 
7* ” 


/* 
/* 
/* 
7* 
(* 
7* 
7* 
7* 
7* 
/* 
7* 
/* 
/* 
/* 
7* 
/* 
7% 
/* 
7% 
/* 
(*® 
/* 
/* 
7% 
/* 
7* 
7* 
7* 
7* 
/* 
/* 
7* 
7* 
/* 
7% 
/* 
/* 
7* 
7* 
/* 
7* 


/* 
/* 
/* 
/* 
/* 
/* 
/* 
7® 
/* 
/* 
/* 


FIELD 
DESCRIPTION 


TKV PARMS: 


MENU PARAMETERS: 
* PROJECT NAME 
~ LIBRARY NAMES 


° TYPE QUALIFIER 

MEMBER NAME 

"OTHER" FILE ID: 
"OTHER" DATASET NAME 


“OTHER VOLUME SERIAL 


’ DATASET PASSHORD 
_ PROFILE NAME 
REASON CODE 
RECOVERY NODE 
AUTONUM MODE 
PRINT MODE 
STATS MODE 
USER FIELD 
CURRENT "OTHER" FILE ID 
wi RESERVED 3 
QNAME FOR ENQ/DEQ: 
“SPFDSN 
RNAME FOR ENQ/DEQ: 


DSN 

MEMBER 
#% RESERVED 
DATASET TYPE ('ASM’,ETC) 
MEMBER NAME FROM CMD 
%% RESERVED *# 
EXTEND COMMAND MEM NAME 
EXTEND COPY 1ST LINE 


EXTEND COPY LAST LINE 


EXTEND COPY RANGE INDIC 
* *=N0,S=STD,C=COB,R=REL 
%* RESERVED 
CREATE/REPLACE DSN 

FIRST WHEN EOCRSPEC=R 
LAST WHEN EDCRSPEC=R 
MENU FOR EMP TO DISPLAY 
SIZE OF EDT & ASSOC AREA 
GENHELP MENU FROM HEADER 
CMD INPUT AREA PTR 

CMD INPUT AREA SIZE 


EXTEND COPY MENU 1ST LINE 
EXTEND COPY MENU LAST LIN 


EXTRA SPACE 


EDIT ERROR CODE 

EDIT MESSAGE CODE 
POINTER TO SHORT MSG 
POINTER TO LONG MSG 


ABEND CODE FOR ERR MSGS 


SHIFT ERR CNT FOR MSGS 
GENERAL ERROR POINTER 
GENERAL ERROR POINTER 
GENERAL ERROR POINTER 
GENERAL ERROR POINTER 
GENERAL ERROR POINTER 


(CONTINUED ON NEXT PAGE) 


EDT - EDIT TABLE (CONTINUED ) 
OFFSET FIELD 
DEC HEX NAME 
/* — EDTGOCLS 

656 290 2 EDTPARNV, 

656 290 3 EDTPRJO CHARACTER(8), 

664 298 3 EDTLIBO CHARACTER(8), 

672 2A0 3 EDTTYPO CHARACTER(S), 

680 2A8& 3 EDTMPARM, 

680 2A8--— 4 EDTMPROJ CHARACTER(8}, 

688 cB 4 EDTMLIBS, 

688 2B0 5 EDTMLIB (4) CHARACTER(8), /* 

720 = =2D0 G EDTMTYPE CHARACTER(S), 

728 2D8 4 EDTNHENB CHARACTER(8), 

736 = 2E0 & EDTNOFID CHARACTER(62)> 

736 2E0O 5 EDTMDSN CHARACTER(56), 

792 318 5 EDTMVOL CHARACTER(6), 

798 = 3S1E 4 EDTMPSKD CHARACTER(S), 

806 326 4 EDTMPNAM CHARACTER(8), 

814 32E 4 EDTHUOPT CHARACTER(2), 

816 330 4 EDTMREC CHARACTER(2), 

818 332 4 EDTMANUM CHARACTER( 2), 

820 334 4 EDTMPRT CHARACTER(2)> 

822 336 & EDTMSTAT CHARACTER(2)> 

824 3338 4 EDTMUSER CHARACTER(8}, 

832 340 2 EDTCOFID CHARACTER(62)>, 

894 37E 2 * CHARACTER( 2), 

896 380 2 EDTQNAME CHARACTER( 8) 

BOUNDARY (DRORD ) > 

904 6388 2 EDTRNAME CHARACTER( 52 ) 

BOUNDARY(DWORD), 

904 388 3 EDTRDSN CHARACTER(44)> 

948 354 3 EDTRMEM CHARACTER(8), 

956 3BC 2 * CHARACTER(4), 

960 3C0 2 EDDSTYPE CHARACTER(8), 

968 3C8 2 EDMEMNAM CHARACTER(S), 

976 300 2 * CHARACTER( 56), 
1032 408 2 EDCMEMNM CHARACTER(S), 
1040 410 2 EDCFLINE CHARACTER(8) 

BOUNDARY (OWNORD)» 
1048 418 2 EDCLLINE CHARACTER(8) 

BOUNDARY (DWORD ), 
1056 420 2 EDCRSPEC CHARACTER(1), 
1057 421 2 % CHARACTER(3), 
1060 424 2 EDCRDSN CHARACTER(44), 
1104 450 2 EDCFRLIN FIXED(31), 
1108 454 2 EDCLRLIN FIXED(31), 
ll12 458 2 EDTMENU CHARACTER(8), 
1120 460 2 EDTASIZE FIXED(31), 
1124 464 2 EDTHELP CHARACTER(8), 
1132 46C 2 EDTIDABP PTR(31)>, 
1136 470 2 EDTINSIZ FIXED(31), 
1140 474% 2 EDCMFLIN CHARACTER(8), 
1148 47C 2 EDCMLLIN CHARACTER( 8); 
1156 484 2 * CHARACTER(12), 

/* — EDTNDCLS 

1168 490 2 EDERCODE CHARACTER(G), 
1172 494 2 EDNGCODE CHARACTER(4), 
1176 498 2 EDTSMSGP POINTER( 31), 
1180 49C 2 EDTLMSGP POINTER( 31), 
1184 4A0 2 EDABCOD CHARACTER(4), 
11868 4A4 2 EDSHFERC FIXED( 31), 
1192 4A8 2 EDERIP POINTER(31)>, 
1196 4AC 2 EDERe2P POINTER(31); 
1200 4BO 2 EDER3P POINTER(31), 
1204 4B4 2 EDERGP POINTER(31)>, 
1208 468 2 EDER5P POINTER(31)> 
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EDT ~ EDIT TABLE (CONTINUED ) 
OFFSET FIELD FIELD 
DEC HEX NAME DESCRIPTION 
1212 4BC 2 EDER6P POINTER(31);, /* GENERAL ERROR POINTER */ 
1216 4c0 2 EDER7P POINTER(31);, /* GENERAL ERROR POINTER */ 
1220 4C4 2 EDER8P POINTER(31), /% GENERAL ERROR POINTER ¥*/ 
1224 4c8 2 EDER9P POINTER(31)>; /* GENERAL ERROR POINTER */ 
1228 4cCC 2 EDERIOP POINTER(31)> /* GENERAL ERROR POINTER */ 
1232 4D0 2 EDERIIP POINTER(31), /* GENERAL ERROR POINTER */ 
1236 4D4 2 EDER12P POINTER(31)> /* GENERAL ERROR POINTER ¥*/ 
1240 4D8 2 EDER13P POINTER(31)>, /* GENERAL ERROR POINTER */ 
1244 4DC 2 EDERIGP POINTER(31)> /*% GENERAL ERROR POINTER */ 
1248 4E0 2 % CHARACTER(16)> /*% EXTRA AREA */ 
/* — EDTPDCLS */ 
1264 4FO 2 EDTPROF CHAR(8), /* PROFILE (D.S.TYPE) NAME */ 
1272 4F8 2 EDTEOPN CHAR(24), /* PROFILE OPTIONS NEW %/ 
1296 510 2 EDTEOPC CHAR( 24), 7% PROFILE OPTIONS CURRENT */ 
1320 528 2 EDTMASKC CHAR(1), /* MASK CHANGED 'Y' OR 'N' */ 
1321 529 2 EDTTABSC CHAR(1), /* TABS CHANGED 'Y’ OR 'N' */ 
1322 52A 2 EDTMISCC CHAR(1)> /* MISC CHANGED 'Y' OR 'N' */ 
1323 52B 2 EDTPROFL CHAR(1); /* PROF LRECL (1 TO 255) ¥*/ 
1324 52C 2 EDTPROFR CHAR(1), /* PROF RECFM ‘F' OR 'V' #/ 
1325 52D 2 EDTPROFD CHAR(1), /* PROF DEFAULT 'C’ OR */ 
/* 'C" — USE CURR AS DEF */ 
/* ELSE USE STD DEFAULT */ 
1326 52E 2% CHARACTER(2), /* EXTRA AREA */ 
/* — EDTRDCLS */ 
7* EDR VARIABLES */ 
1328 530 2 EDGMSIZE FIXED(31), /* GETMAIN (EDR BLOCK) SIZE */ 
1332 534 2 EDEDRSZ FIXED(31), /* EDR SIZE (LRECL + BASE) ¥*/ 
1336 538 2 EDTEDRO FIXED(31), /* EDR OFFSET( LENGTH-EDRBASE )*/ 
1340 53C 2 EDTLRECL FIXED(31), /* LRECL (DATA SIZE IN EDR) */ 
1344 540 2 EDTEDRCT FIXED(31), 7% EDR COUNT (ON CHAIN) */ 
1348 544 2 EDPXNUMB FIXED(31), /* PREV XCLUDED EDR NUMB */ 
1352 548 2 EDTSTDCT FIXED(31), 7* STD EDR COUNT (ON CHAIN) */ 
1356 54C 2 EDTDELTA FIXED(31), /7* SEQUENCE NUMBERING DELTA */ 
1360 550 2 EDRDAP POINTER(31), /* EDR DISPLAY ARRAY PTR */ 
1364 554 2 EDTEDRBS CHARACTER( 20)> /* ORED INTO EDRBASE BY EDI */ 
1384 568 2 EDCOLS, /* %/ 
1384 568 3 EDCOL (8,2) FIXED(31), /* COLUMN (TYPE, LIR) ARRAY */ 
1448 5A8 2 EDRP (30) POINTER(31),__—-, /® EDR (ED REC) PTRS ARRAY #/ 
-5Ag ¢ £ TPO 7* 1-> TOP (COMMAND AREA) #/ >< 
-SAC EVECT /* 2-> BOTTOM (COMMAND AREA) */- ¢ 
~ BS 7* 3-> INSERT ¥/ 7 7 
~ 5BY 7* G-> EXCLUDED ¥/- 
-oBE 7% 5-> CHANGED #/- 6 
— TEC /*% 6—-> CHANGE NOT DONE M/- - B 
—~65C2 /* 7-> SHIFT INCOMPLETE */ 
—gcr /* 8-> BOUNDS %/- 
ines — 5 CF /% 9-> COLUMNS */~ 
—5 CC 7% 10->MASK */~ 
Evcghe — 5 De /* 11->TABS */ 
- 5 pu /* 12->INPUT TAB ERROR */ 
~ 50% 7* 13->MESSAGE LINE ne 
Spc /* 14->0PTION LINE 1 */- 
a “0 7* 15->OPTION LINE 2 x/ , G 
“Ge /* 16->OPTION LINE 3 #7 oO © 
Sts /*% 17->TEXT ENTRY eft mt 
1568 620 2 EDCAREA (20) CHARACTER(6), /% CMD AREA ARRAY */ 
1688 698 2% CHARACTER( 24), /* */ 
/7* — EDTSDCLS %/ 
1712 6B0 2 * BIT(64)> /*% EDIT STATUS/CNTL BITS: */ 
1712 6650 3 EDCSTAT BIT(8), /* CURRENT STATUS BITS: */ 
1712 6B0.0 Gq BIT(5)> /* */ 
1712 6B0.5 4 EDCTOP BIT(1), /* F/C TOP OF DATA */ 
1712 6B0.6 4 EDCBOT BIT(1)>» /* F/C BOTTOM OF DATA */ 
1712 6B0.7 4 EDCKRAP BIT(1), /* F/C WRAP AROUND */ 
1713 6B1 3 EDPSTAT BIT(8), /* PREVIOUS STATUS BITS: */ 


(CONTINUED ON NEXT PAGE) 
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DATA AREAS 


EDT 
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EDT - EDIT TABLE ( CONTINUED) EDT 


OFFSET FIELD FIELD 
DEC HEX NAME DESCRIPTION 
1713 6B1.0 G& BIT(S5), /* "/ 
1713 661.5 4 EDPTOP BIT(1), /* F/C TOP OF DATA %/ 
1713 +6B1.6 4 EDPBOT' BIT(1)> /* F/C BOTTOM OF DATA */ 
1713 6681.7 4 EDPWRAP BIT(1), /* F/C BRAP AROUND %/ 
1714 46B2 3 % BIT(8)>» /* MISC STATUS BITS: */ 
1714 6B2.0 & EDBNOMOD BIT(1), /* BOUNDS MODIFIED */ 
1714 «6B2.1 Gq * BIT(1), /* #% RESERVED / 
1714 6B2.2 4 EDCSRSET BIT(1)> 7% CSR (TLOCSRP) SET ¥*/ 
1714 6B2.3 G EDNERMEM BIT(1)> /* NEW MEMBER */ 
1714 6B2.4% 4 EDTCHGED BIT(1), /* ACTIVE SOURCE CHGED */ 
1714 6B2.5 4 EDTSAVED BIT(1), /* DATA HAS BEEN SAVED */ 
1715 6B3 3 BIT(8), /* %% RESERVED 23 */ 
1716 6B4 3 EDCMSITS BIT(16), 7%  COPY/MOVE STATUS BITS: */ 
1716 6B4.0 4 EDSBEFOR BIT(1), /* BEFORE DESTN DEFINED */ 
1716 684.1 4 EDSAFTER BIT(1)> /* AFTER DESTN DEFINED ¥*/ 
1716 684.2 4 EDSOVER BIT(1)> /* OVER DESTN DEFINED %/ 
1716 6B4.3 4 EDSOVER] BIT(1), /* SECOND OVER EFINED */ 
1716 684.4 4 EDSOVER2 BIT(1), /* SECOND OVER EFINED %/ 
1716 654.5 Gq * BIT(3), /* %% RESERVED ** */ 
1717 6B5.0 4 EDSCOPY1 BIT(1), /* COPY 1 DEFINED %/ 
1717 =6B5.1 4 EDSCOPY2 BIT(1)>, /* COPY 2 DEFINED */ 
1717 655.2 4 EDSMOVE] BIT(1), /* MOVE 1 DEFINED %/ 
1717 685.3 4 EDSNOVE2 BIT(1), 7% MOVE 2 DEFINED */ 
1717 665.4 4 EDSBLOCK BIT(1)> /* BLOCK CMD DECODED %/ 
1717 685.5 Gq * BIT(3)>, /* %*% RESERVED */ 
1718 686 3 * BIT(8)>» /* ¥% RESERVED ** %/ 
1719 6B7 3 * BIT(8)» /* *% RESERVED %/ 
1720 6B8 2%, /* */ 
1720 6B8 3 EDHTCHAR FIXED(8}, 7% HARDWARE TABS CHAR (*) %/ 
1721 6B9 3 EDCTCHAR FIXED(8), /7* SOFTWARD CURSOR CHAR (-) */ 
1722 OBA 3 EDC2CHAR FIXED(8), 7* SOFTWARD CURSOR CHAR (_) ¥*/ 
1723 68B 3 EDLBCHAR FIXED(8), /7* LEFT BOUND CHAR (<) %/ 
1724 6BC 3 EDRBCHAR FIXED(8), 7* RIGHT BOUND CHAR (>) %/ 
1725 65D 3% CHAR(3), 7% ¥% RESERVED */ 
1728 6CO 3 EDTDSORG CHARACTER(1), 7% DSORG (P-PDS, S-SEQ) */ 
1729 6C1 3 EDTRECFM CHARACTER(1), 7% RECFM (F~FIX, V-VAR) ¥/ 
1730 6C2 3 EDTSDEX, 7% SPF DIR ENTRY DATA / 
1730 6C2 & EDTSSMEM CHARACTER(1), /* SPF STATS EXIST ‘Y¥','N’ */ 
1731 6C3 4 EDTVLCUR FIXED(8), 7% VERSION LEVEL — CURR %/ 
1732 6C4% 4 EDTMLCUR FIXED(8), 7*% MOD LEVEL — CURR */ 
1733 =6C5 3 EDTABEND CHARACTER(1), /7* EDO ABEND OCCURRED (Y/N) */ 
1734 6C6 3% CHAR( 2), 7* *% RESERVED %/ 
1736 6C8& 3 EDTPARMI CHARACTER(1), 7% EDTPARNV INITIALIZED( Y/N} */ 
1737 6C9 3 EDTRDTOP CHARACTER(1); 7% REDISPLAY TOP 2 LINES */ 
7% ('Y’ — YES, ELSE NO) */ 
1738 6CA 3 * CHAR(6)> 7% **% RESERVED x ; %/ 
1744 «69600 3 EDTEDIFG CHAR(8), /* CODES SET BY EDI BASED */ 
/* ON THE DATA IT READS */ 
7% " "=<DATA IGNORED %/ 
7*# = "Y"~YES,"'N'"-NO */ 
7*& = "M"'-MAYBE */ 
7% (NUMERIC NOT ASCENDING )*/ 
1744 600 4 EDTEDIIC CHARACTER(1), /* INVALID CHAR 'Y' OR ‘N' ¥/ 
1745 6D1 4 EDTEDILC CHARACTER(1), 7* LOWER CASE 'y' OR 'N’ #7 
1746 6D2 4 EDTEDIUC CHARACTER(1), 7% UPPER CASE "Y' OR 'N' ¥/ 
1747 6D3 4 EDTEDIML CHARACTER(1), 7* VALID MOD LVL 'Y' OR 'N' #/ 
1748 6D4¢ G4 EDTEDIRC CHARACTER(1)> 7% VALID REASON '‘'Y' OR 'N' ¥/ 
1749 6D5 4 EDTEDICN CHARACTER(1); 7% COBOL NUMB ‘'Y* ‘"N* 'M’ */ 
1750 606 4 EDTEDI6N CHARACTER(1), 7* STD 6 NRUMB 'Y® 'N* ‘M' %/ 
1751 6D7 4 EDTEDI8N CHARACTER(1)>, 7* STO 8&8 NUMB 'Y® 'N’ 'M' */ 
1752 408 3 EDTRESET CHARACTER(1);, 7/* EGR RESET TYPE CODE */ 
/* ‘I'-INIT, 'F'-FINAL */ 
1753 6D9 3 EDTNUMBR CHARACTER(1), 7* EGN NUMSER TYPE CODE */ 
7% "N'-NUMB, "R'-RENUM  */ 
/* * '-UNNUM */ 


(CONTINUED ON NEXT PAGE) 
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‘in. 


tn 


EDT 


OFFSET 


BEC HEX 


1754 6DA 
1755 6DB 
1756 6DC 
1758 6DE 


1760 6E0 
1784 6F8 


LICENSED MATERIAL - PROPERTY OF IBM 


- EDIT TABLE (CONTINUED ) 


FIELD 
NAME 


3 EDTEDODF CHARACTER(1)> 
3 EDTEFROD CHAR(1), 


3 EDTREASN CHAR(2), 


3 * CHAR(2)> 
2 EDTEOPB CHARACTER( 24), 
2 CHARACTER( 24); 


/* 


FIELD 
DESCRIPTION 


EDO: DEL/FREE EDRS(Y,N) */ 


(*Y’ — YES, ELSE NO) *7 
EFR — ORIGINAL DATA READ*/ 
('¥Y' — YES, ELSE NO) */ 
REASON CODE %/ 
BLANK, OR CODE */ 


/*® #* RESERVED ¥% */ 


7* 
/* 


EOP BACKUP FOR CHECKING */ 
EXTRA AREA %/ 


DATA AREAS 


EDT 
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ELC - EDIT LINE COMMAND ELC 


OFFSET FIELD FIELD 
DEC HEX NAME DESCRIPTION 

0 0 1 ELC BASED, /* %/ 
0 0 2 ELCCODE FIXED(8), 7% COMMAND CODE %/ 
1 1 2 ELCPASS FIXED(8)>, 7* PASS TO BE EXEC (1-3) ¥*/ 
2 2 2 ELCTYPE BIT(8), /* COMMAND TYPE BITS %/ 
2 2.0 3 ELCAFTER BIT(1); /* AFTER CONMAND */ 
2 2.1 3 ELCBEFOR BIT(1), /* BEFORE COMMAND / 
2 eve 3 ELCCOPY BIT(1); /* COPY COMMAND %/ 
e 2.3 3 ELCMOVE BIT(l); /* MOVE COMMAND %/ 
2 2.4 3 ELCMULTI BIT(1), /* MULTI-LINE TYPE CMD ¥*/ 
2 2.5 3 ELCBLOCK BIT(1), /* BLOCK TYPE COMMAND */ 
2 2.6 3 % BIT(1), /* *% RESERVED 3% */ 
2 2.7 3 ELCOVER BIT(1l), /* OVER COMMAND */ 
3 3 2 ELCCSR BIT(8);, 7% CURSOR POSITIONING BITS */ 
3 3.0 3 ELCNEXT BIT(1); /* NEXT (AFTER LAST) EDR¥/ 
3 3.1 3 ELCLAST BIT(1), /* LAST EDR */ 
3 3.2 3 ELCFIRST BIT(1); /* FIRST EOR %/ 
3 3.3 3 ELCPREV BIT(1), /* PREV (TO FIRST) EDR */ 
3 3.4 3% BIT(3); /* * RESERVED %/ 
3 3.7 3 ELCPLUS1 BIT(1);, /* PLUS 1 EDR AT DISPLAY*#/ 
4 4 2 ELCSUFFX FIXED(8), 7% SUFFIX DEFAULT VALUE */ 
5 5 2 ELCLMASK BIT(8), 7% LINE (TYPE) MASK %/ 
6 6 2 ELCPRSUB FIXED(8); /* PROCESS SUBROUTINE INDEX#/ 
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~C 


MHAF 


OFFSET 


HEX 


- MENU BUFFER 


FIELD 


NAME 


1 MHAF BASED; 


2 


NN NN NY PD PP 


MHAFSPLN, 
3 MHAFSP  FIXED(8), 
3 MHAFLN FIXED(24), 
MHAFNAME CHAR(8), 
MHAFHELP CHAR(8), 
MHAFPARM (103) PTR(31)> 
MHAFMME PTR(31), 
MHAFACTS PTR(31), 
MHAFACTE PTR(31), 
MHAFNRP FIXED(31), 
MHAFACTT (100) 
CHAR( LENGTH( MHAFACTN } ) 
BOUNDARY (WORD); 
MHAFADA CHAR(*); 


MHAFACTN — ACTION STATEMENT TABLE ENTRY 


OFFSET 
DEC HEX 
0 0 
0 0 
2 2 
3 3 
3 3.0 
3 3.1 
3 3.2 
3 3.3 
3 3.4 
4 4 
6 6 
8 8 
12 Cc 
16 §=610 
2006014 
22 «616 
240=—s «18 
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FIELD 


NAME 


1 MHAFACTN CHAR( 32) 


2 
2 
2 


NNN NNN NT 


BOUNDARY(RORD) BASED» 
MHAFAPLP FIXED(15), 
MHAFAPLN FIXED(8), 
MHAFABTS BIT(8), 

3 MHAFAFXD BIT(1); 

3 MHAFCURS BIT(1); 

3 MRAFNOCU BIT(1), 

3 MHAFRJ BIT(1)> 


3 BIT(4), 
MHAFAFCP FIXED(15), 
* CHAR(2)> 


MHAFAIP PTR(31)> 
MHAFALP PTR(31);, 
MHAFARP PTR(31), 
MHAFALN FIXED(15)> 
MHAFARN FIXED(15), 
MHAFAKEY CHAR(8); 


/*® 
/* 
/* 
[* 
/* 
/* 
/* 
/* 
/* 
/* 
7% 
/* 
/* 
/* 
/* 
/* 
/* 
/* 


7% 
/* 
7* 
7% 
/* 
7*® 
7* 
7* 
7* 
7% 
7* 
7* 
7* 
7% 
7* 
7* 
7* 
/* 


FIELD 
DESCRIPTION 


MHA BUFFER FOR MENU 
BUFFER SUBPOOL & LENGTH 
SUBPOOL 
LENGTH 
NAME OF MENU IN BUFFER 
PRIMARY HELP NAME 
SAVED MHA PARAM LIST 


*/ 
*/ 
*/ 
%/ 
*/ 
*/ 
*/ 


PTR TO END OF MODEL MENU +1 #/ 
PTR TO START OF ACTION TABLE */ 
LAST ENTRY OF ACTION TABLE */ 
NUMBER OF SUBSTITUTION PARAMS */ 


ACTION STMT TABLE AREA 


AREA TO STORE ACTION DATA 
ACTUAL SIZE IF MHAFADA IS 
DETERMINED BY CONSTANT IN 
MHA NAMED MHAFADAL 


FIELD 
DESCRIPTION 


%/ 
%/ 
%/ 
*/ 
*/ 
*/ 
*/ 


ACTION STATEMENT TABLE ENTRY */ 
(ONE PER ACTION STATEMENT) */ 


PARAMETER LIST POSITION 
PARAMETER LENGTH 
BIT FLAGS 
FIXED CELSE CHAR) 
CURSOR PARAM 
NOCURSOR PARAM 


%/ 
%/ 
*/ 
*/ 
*/ 
%/ 


INITR PARAM (RIGHT JUSTIFY) */ 


SPARE 
INFUT FIELD CHAR POSITION 
SPARE 
ADDR OF INIT DATA 
ADDR OF LIST DATA 
ADDR OF RETURN DATA 
NUMBER OF LIST VALUES 
NUMBER OF RETURN VALUES 


%/ 
%/ 
*/ 
%/ 
%/ 
%/ 
*/ 
%/ 


KEY NAME USED BY FOR & JOB %/ 


DATA AREAS 


MHAF 
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SDE - SPF DIRECTORY ENTRY 
OFFSET FIELD 
DEC HEX NAME 

0 0 1 SDE BASED, 

0 0 2 SDEVERS FIXED(8), 

1 1 e SDEMOD' FIXED(8), 

2 2 2 SDERESV FIXED(16), 

4 4 2 SDECDATE CHAR(4), 

8 8 @ SDEMDATE CHAR(4)>, 
12 Cc 2 SDEMTIME CHAR(2), 
14 E @ SOECLINE FIXED(16), 
16 10 2 SDEILINE FIXED(16); 
18 12 2 SDENLINE FIXED(16); 
20 14 2 SDEID CHAR(7)> 
27 8618 @ SDEBLANK CHAR(3)5 
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FIELD 
DESCRIPTION 
7% SPF DIRECTORY ENTRY %/ 
/*% VERSION LEVEL %/ 
/* MOD LEVEL %/ 
/*% * RESERVED */ 
/* CREATION DATE */ 
/* DATE LAST MODIFIED */ 
/*% TIME LAST MODIFIED */ 
7% CURRENT NUMBER OF LINES */ 
/* INITIAL NUMBER OF LINES */ 
/% NUNBER OF MODIFIED LINES#¥/ 
/* USER ID %/ 
/* * RESERVED (BLANKS) */ 


LICENSED MATERIAL ~- PROPERTY OF IBM 


Tes - COMMAND SCAN TABLE 


OFFSET FIELD 
DEC HEX NAME 


1 Tcs BASED, 
2 TCSCIP PTR(31), 
2 TCSCISZ FIXED(31), 
2 TCSKDCT FIXED(31), 
2 TCSTCDP PTR(31), 
2 TCSHDS (12) CHAR(16); 


ONO fad 


0 
0 
4 
8 
12 
16 1 


TCSWD — COMMAND SCAN TABLE ENTRY 


OFFSET FIELD 
DEC HEX NANE 
0 0 1 TCSWD BASED(ADDR(TCSWDS)), 
0 0 3 TCSKDSZ FIXED(8), 
1 1 3 TCSRDP PTR(24), 
4 4 3 TCSSTRSZ FIXED(8)> 
5 5 3 TCSSTRP PTR(24), 
& 8 3 TCSTYPE BIT(8); 
8 8.0 4 TCSQUOT BIT(1), 
8 8.1 q& * BIT(1); 
8 8.2 4 TCSNUMB BIT(1), 
8 8.3 4 TCSHEX BIT(1)> 
8 8.4 4 TCSPICT BIT(1)> 
8 8.5 4 TCSTEXT BIT(1),» 
8 8.6 & * BIT(2), 
9 9 3 TCSCODE FIXED(8), 
19 A 3 TCSERR BIT(8), 
10 A.0 4 TCSIVSIZ BIT(1), 
10 A.l & TCSIVHEX BIT(1), 
10 A.2 @ TCSIVNCQ BIT(1}; 
10 A.3 Gq * BIT(5), 
ll B 3% CHAR(1), 
12 Cc 3 FIXED(31)5 
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/* 
7% 
/* 
/* 
7% 
/* 


/* 
/* 
/* 
/* 
7* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 


FIELD 
DESCRIPTION 
*/ 
PTR TO COMMAND INPUT ~ */ 
COMMAND INPUT SIZE — ¥*/ 
COMMAND INPUT WORD COUNT#/ — 
COMMAND DEF ENTRY PTR ¥*/— 
PRIMARY CMD HORDS( ARRAY )*/ — 
FIELD 
DESCRIPTION 
3/ 
SIZE OF TOTAL WORD */ 
PTR TO TOTAL WORD %/ 
SIZE OF STRING %/ 
PTR TO STRING */ 
FLAG BITS */ 
QUOTED STRING ("| * )*/ 
*%* RESERVED x% */ 
NUMERIC WORD */ 
HEX STRING */ 
PICTURE STRING. */ 
TEXT STRING %/ 
% RESERVED %/ 
COMMAND WORD KEYCODE*/ 
ERROR FLAG BITS */ 
HEX STRING ODD SIZE */ 
NON HEX DIGITS IN STR */ 
INVAL NO CLOSING QUOTE*/ 
*#% RESERVED %% */ 
%% RESERVED xx %/ 
x% RESERVED x */ 
DATA AREAS 


Tes 
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TcT 


OFFSET 
DEC HEX 
0 0 
0 0 
8 8 
& & 
12 Cc 
16 #810 
eco) 014 
24 «618 
e& 1C 
e686 1c 
32 = 20 
36 = 24 
40 28 
4&4 2c 
48 30 
52 34 
56 = 358 
60 3C 
64 40 
68 44 
72 =—48 
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~- CONTROL TABLES TABLE 


FIELD 
NAME 


1 TCT 
2 * 


BASED, 
CHAR(8); 


2 TCTTRTPS, 


3 
3 
3 


Ul UF OF OF OF OF OF OF OF UF Ut Ot 


TCTLOCP 
TCTATTP 
TCTAIOP 


TCTETOP 
TCTGSCP 
TCTGSHP 
TCTGSSP 
TCTEDIP 


TCTEDOP 
* 
* 


PTR(31), 
PTR(31), 
PTR(31)> 
PTR(31), 
PTR(31), 


PTR(31), 
PTR(31)>, 
PTR(31)> 
PTR(31), 
PTR(31)>, 
PTR(31), 
PTR(31), 
PTR(31)>, 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31);3 


7% TRANSLATE TABLES TABLE 
TCT IDENTIFICATION 


/* 
/*® 
/* 
/* 
7/*® 
/* 
/* 
/* 
/* 
/* 
/* 
/* 


FIELD 


DESCRIPTION 


PTRS FROM TRT 
LOC TBL PTR 
ATT TBL PTR 
AID TBL PTR 
¥#% RESERVED 
*% RESERVED 

PTRS FROM 


UPP 
LOW 
VAL 
BTO 
ETO 
GSC 
GSM 
GSS 
EDI 
EDO 


TBL 
TBL 
TBL 
TBL 
TBL 
TBL 
TBL 
TBL 
TBL 
TBL 


TIT 
PTR 
PTR 
PTR 
PTR 
PTR 
PTR 
PTR 
PTR 
PTR 
PTR 


HH 


*% RESERVED *% 
¥% RESERVED #% 


%/ 
%/ 
%/ 
*/ 
%/ 
%/ 
%/ 
%/ 
*/ 
*/ 
%/ 
%/ 
#/ 
*/ 
*/ 
*/ 
*/ 
*/ 
*/ 
*/ 
/ 


TCT 
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& 
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TDS 
OFFSET 
DEC HEX 
0 6060 
) 0 
& 8 
: 
16 10 
20 14 
24 «18 
28 1c 
32-20 
360-24 
40 28 
44° 2C 


- DATA SET TABLE 


FIELD 


1 TOS 


NANA NNN HN PP 


NAHE 


% 
TDOSPARMP 
TDSPROCP 
TDSMENUP 
TOSNSGSP 
TOSLISTP 
TDSLOGP 
TDSEBUAP 
TDSEBUBP 
* 

* 


BASED,» 


CHAR(8), 
PTR(31)> 
PTR(31)> 
PTR(31), 
PTR(31)>5 
PTR(31)>5 
PTR(31), 
PTR(31)> 
PTR(31)> 
PTR(31), 
PTR(31)3 


FIELD 
DESCRIPTION 


TOS IDENTIFICATION 
PARMS TFD PTR 
PROCS TFD PTR 
MENUS TFD PTR 

MSGS TFD PTR 

LIST TFD PTR 

LOG TFD PTR 


*/ 
%/ 
*/ 
%/ 
%/ 
%/ 
*/ 
*/ 


EDIT BACKUP "A" TFD PTR */ 
EDIT BACKUP "B" TFD PTR */ 


** RESERVED 
*¥% RESERVED ** 


#/ 
*/ 


DATA AREAS 


TBS 
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FIELD 

DESCRIPTION 
%/ 
*TFD:* | */ 
ARRAY OF DDONAMES %/ 
CTA/CTF STATUS BITS: */ 
RESTART FLAG %/ 
ALLOCATED (TRIED) */ 
PREALLOCATED %/ 
ALLOCATED OLD */ 
RECOVER FROM ABEND */ 
DCB ABEND OCCURRED */ 
CTA FAILED */ 
RESERVED %/ 
INFUT STATUS FOR CDO/CDC */ 
DCB PRE-INITIALIZED */ 
VALIDITY CK REQUESTED */ 
PDS OK SWITCH %/ 
SEQ OK SWITCH */ 
RECFM=U OK SWITCH %/ 
RECFM=V OK SWITCH %/ 
RECFM=F OK SWITCH %/ 
BYPASS BUFFER GETMAIN */ 
CDO/CDC/CRESV/CRELS SW */ 
ON IF OPENED BY CDO */ 
EMPTY INPUT SEQ DS %/ 
RESERVE REQUEST SWITCH */ 
LINK EDIT ENQ REQUIRED */ 
RECFM OVERRIDE SWITCH ¥*/ 
CRELS DEQ SYSTEMS SWITCH*/ 
RESERVED %/ 
CDG/CDP STATUS BITS: */ 
CDG READ-REQUEST SW %/ 
CDG UPDATE-IN-PLACE SW */ 
COG/CDP NOTE REQUIRED */ 
COG ENTRY CODE 5 SW %/ 
RESERVED %/ 
DCB POINTER %/ 
DCB NUMBER *#00S*/ 
%/ 
TFODSNS POINTER */ 
TFDOMENUD POINTER */ 
DECB %/ 
DCB EXIT LIST POINTER */ 
POINTER TO MEMBER LIST %/ 
PTR TO BLDOL LIST, OR O %/ 
CDG/CDP PARAMETERS: %/ 
ENTRY CODE %/ 
RECORD LENGTH %/ 
RECORD POINTER %/ 
LST CR CURRENT TTRN */ 
BUFFER A ADDRESS %/ 
BUFFER OFFSET */ 
ACTUAL BLOCK SIZE READ ¥*/ 
SPF LOGICAL REC LENGTH / 
SAME AS DCBBLKSI */ 
MAXIMUM LRECL ALLOWED %/ 
RECFM (SAME AS DCBRECFM): */7 
TYPE OF RECORD FORMAT ¥*/ 
SEE CONSTANTS BELOW ¥*/ 
TRACK OVERFLOW %/ 
BLOCKEO */ 
STANDARD GR SPANNED %/ 
PRINT CONTROL TYPE %/ 
SEE CONSTANTS BELOW ¥*/ 
KEY LENGTH SPECIFIED */ 


(CONTINUED ON NEXT PAGE) 


TFD - FILE DEFINITION TABLE 

OFFSET FIELD 
DEC HEX NAME 

0 0 1 TFD BASED BOUNDARY( WORD), 

0 0 2 TFDHDRID CHARACTER(4), 

4 4 2 TFODDN (4) CHARACTER(8)> 
360 24 2 TFDOSTATI BIT(8), 

36 24.0 3 TFDOREST BIT(1), 

36 24.1 3 TFDALLOC BIT(1), 

36 24.2 3 TFDPREAL BIT(1), 

36 24.3 3 TFDOLD BIT(1), 

36 24.4 3 TFORECVR BIT(1), 

36 24.5 3 TFODCBAB BIT(1), 

36 24.6 3 TFDOCTAX BIT(1), 

36 24.7 3 BIT(1), 

37 = 25 2 TFDOSTAT2 BIT(8), 

37 =6©25.0 3 TFDDCBI BIT(1); 

37 = 25.1 3 TFOVAL BIT(1), 

37 = 25.2 3 TFDPDS BIT(1), 

37 =625.3 3 TFOSEQ BIT(1); 

37 =.25.4 3 TFORFU- BIT(1), 

37 8625.5 3 TFDORFV BIT(1)> 

37 §=625.6 3 TFDRFF BIT(1), 

37s 25.7 3 TFDNCSUF BIT(1)> 

38 = 2.6 2 TFDSTAT3 BIT(8)>, 

38 =—626.0 3 TFDOFN BIT(1), 

38 26.1 3 TFDESEQ BIT(1), 

38 26.2 3 TFORESV BIT(1), 

38 26.3 3 TFOLENQ BIT(1); 

38 26.4% 3 TFDRFMNO BIT(1), 

38 26.5 3 TFODEQS BIT(1); 

38 26.6 3 * BIT(2); 

39 27 2 TFDOSTAT¢ BIT(8)> 

39 = 27.0 3 TFDRREQ BIT(1), 

390s 27.1 3 TFDOUPPL BIT(1), 

39 = 27.2 3 TFONOTE BIT(1), 

39s 27.3 3 TFDECODS BIT(1), 

39 = 27.4 3% BIT(4), 

40 28 2 TFDOCBP POINTER(31)>, 
40 28 3 TFDDCB® FIXED(S8), 
41 29 3 # POINTER( 24), 
44 2c 2 TFDOSNP (4) FPOINTER(31), 
60 3C 2 TFDMENUP POINTER(31), 
64 40 2 TFODECB CHARACTER( 24), 
88 58 2 TFOXLP POINTER(31)>, 
92 «=65C 2 TFDCML POINTER(31)> 
96 60 2 TFDBLDLP POINTER( 31), 
100 464 2 TFDECODE FIXED(15), 
102 66 2 TFDORECL FIXED(15), 
104 = 68 2 TFDRECP POINTER(31)> 
108 éC @ TFOTTEN CHARACTER(4), 
1l2 876 2 TFDBUFA POINTER(31)> 
116 74 2 TFOBO FIXEO(15), 
118 38676 2 TFDBLKS FIXED(15), 
1200 0=— 78 2 TFOLRECL FIXED(15), 
l22 7A 2 TFOBLKSZ FIXED(15)> 
12¢)0— 7 2 TFOMAXLN FIXED(15), 
126 7E 2 TFORECFM BIT(8), 
126 7E.0 3 TFORFTYP BIT(2); 
126 7E.2 3 TFORFT BIT(1), 
126 7E.3 3 TFDORFB BIT(1l)» 
126 7E.4¢ 3 TFDRFS BIT(1), 
126 7E.5 3 TFORFCTL BIT(2); 
126 7E.7 3 TFORFK BIT(1), 
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TFB 
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~7 


TFD 

OFFSET 
DEC HEX 
127 8 7F 
127 7F 
127 7F.0 
127 7F.2 
127 7F.3 
127 7F.5 
127 7F.6 
128 80 
128 80.0 
128 80.2 
1268 80.3 
128 80.5 
128 80.6 
129 838681 
129 61.0 
129 3881.1 
129 8 81.2 
129 8681.3 
129 81.4 
129 8=©81.5 
129 81.6 
129 81.7 
1360=—_ 82 
131 83 
1320 84 
132 =©84.0 
1320s 84.1 
1320 84.2 
132 84.3 
132 884.4 
133 = 85 
134 86686 
135 87 
136 8688 
144 90 
152 98 
160 AO 
166 A6 


- FILE DEFINITION TABLE (CONTINUED) 


FIELD 
NAME 
@ TFDMACRF BIT(16), 
3 * BIT(8), 
Gq * BIT(2), 
4 TFDMRRD BIT(1)>, 
G& % BIT(2), 
& TFDMRPT1 BIT(1);, 
q * BIT(2), 
3 * BIT(8), 
Gq * BIT(2)>, 
4 TFDMRERT BIT(1), 
q * BIT(2), 
& TFDMRPTe BIT(1), 
q * BIT(2), 
@ TFDDSORG BIT(S8), 
3 TFOIS BIT(1); 
3 TFOPS BIT(1); 
3 TFDDO BIT(1); 
3 TFDLG BIT(1), 
3 TFDDAMQ BIT(1); 
3 TFOPPMQ BIT(1); 
3 TFDPO BIT(1), 
3 TFDUM BIT(1); 


NNN 


NNN NAN HP PP 


TFDMENUD — DATA 


OFFSET 
DEC HEX 
0 0 
0 0 
& 8 
8 8 
40 8628 
48 30 
56 8=— 338 
li2 70 
118 876 


LICENSED MATERIAL - PROPERTY OF IBM 


TFDDSP1 BIT(8); 
TFDDSP2 BIT(8);, 
TFOSTATS BIT(8); 

3 TFDOTHER BIT(1)> 

3 TFDSPVOL BIT(1); 

3 TFDALLCT BIT(1), 

3 TFDALIAS BIT(1), 

3% BIT(4);5 
TFDDISP BIT(8), 
TFDOPENT BIT(8); 
TFDCLOST BIT(8), 
TFDOMEMNB CHARACTER(8), 
TFOPASSW CHARACTER(8), 
TFDUNIT CHARACTER(S), 
TFDVOL CHARACTER(6), 
* CHARACTER(2)3 


SET MENU INFORMATION 


FIELD 


NAME 


1 TFDOMENUD BASED,» 


NNN PO PO NP 


TFDPROJS CHARACTER(8)> 
TFDOLIBS CHARACTER( 32), 
3 TFDLIB 
TFOTYPE CHARACTER(S), 
TFOMEM CHARACTER(8), 
TFDODSN CHARACTER(56), 
TFDOVOL CHARACTER(6), 
TFDPSKD CHARACTER(8); 


(4) CHARACTER(S), 


7* 
(7% 
/* 


/* 
7% 
7*® 
/* 
7* 
7% 
/* 
7* 
7* 


FIELD 
DESCRIPTION 
MACRF (SAME AS DCBMACRF): */ 
INPUT SWITCHES */ 
%/ 
READ *#/ 
%/ 
POINT */ 
*/ 
OUTPUT SWITCHES */ 
%/ 
WRITE %/ 
*/ 
POINT %/ 
*/ 
DSORG (SAME AS DAO8DSO): */ 
INDEX SEQUENTIAL */ 
PHYSICAL SEQUENTIAL */ 
DIRECT */ 
BTAM/QTAM LINE GROUP “/ 
QTAM DA MESSAGE QUEUE */ 
QTAM PROB PROG MSG QUE */ 
PARTITIONED %/ 
UNMOVABLE %/ 
REQUESTED DISPOSITION: %/ 
STATUS (LIKE DAO8DSP1) */ 
DISP (LIKE DA1L8DPS2) %/ 
STATUS BITS FOR CDA/CDF: */ 
“OTHER DATASET */ 
VOL SER SPECIFIED %/ 
CDA DID AN ALLOC */ 
DSN CHANGED TO REAL DSN */ 
RESERVED %/ 
CURRENT DISP STATUS %/ 
OPEN OPTIONS %/ 
CLOSE OPTIONS */ 
SPECIFIED MEMBER NAME %/ 
PASSKORD */ 
UNIT TYPE FROM CDAIR %/ 
VOLUME SERIAL */ 
#% RESERVED %/ 
FIELD 
DESCRIPTION 
DATASET MENU INFORMATION */ 
PROJECT NAME %/ 
PROJECT LIBRARIES: */ 
LIB1,LIB2,LIB3,LIBG */ 
DATASET TYPE */ 
PDS MEMBER NAME %/ 
“OTHER DSN(MENBER ) %/ 
“OTHER DATASET VOLUME */ 
PASSKORD */ 


DATA AREAS 


TFD 


339 


TLD - LOGICAL DISPLAY TABLE 
OFFSET FIELD 
DEC HEX NAME 
0 0 1 TLO BASED, 
0 0 2 TLOTBLID CHAR(3), 
3 3 2 TLDID CHAR(1}> 
4 4 2 TLONEXTP PTR(31), 
8 8 2 TLDRC FIXED(31), 
12 Cc 2 TLOPCODE CHAR(6), 
18 12 2 TLOECODE CHAR(6); 
24 18 2 * PTR(31), 
28 ic 2 * PTR(31), 
32 20 2 TLOSA (10) FIXED(32), 
72 48 2 *, 
72 48 3 TLOTCBP PTR(31), 
76 4C 3 TLOBDRECB FIXED(32), 
60 50 3 TLDOPRECB FIXED(32), 
84 54 3 TLOTCECB FIXED( 32), 
8&8 58 3 TLOCCI FIXED(31)>, 
92 5C 3 TLOSXECB PTR(31), 
96 60 3 TLDSXTCB PTR(31), 
1900 64% 3 * PTR(31)>, 
104 68 2 TLOSTBLS, 
104 #8668 3 TLOTCMP PTR(31), 
108 6C 3 TLOTCTP PTR(31), 
ll2 70 3 TLOTDSP PTR(31), 
116 74 3 TLOTKVP PTR(31), 
120 78 3 TLOTKWP PTR(31), 
124 7C 3 TLOTSCP PTR(31), 
128 80 3 TLOTSIP PTR(31), 
132 8&4 3 TLDOTSVP PTR(31)> 
136 88 3 TLOTXCP PTR(31), 
140 8c 3 * PTR(31), 
144 90 2 %, 
144% 90 3 TLOMHABP PTR(31), 
148 94% 3 TLOTFOCP PTR(31), 
152 98 3 TLOTFDOLP PTR(31), 
156 9C 3 TLOTFDEP PTR(31), 
160 AO 3 TLOTFKP PTR(31)> 
164 AS 3 TLDTLSP PTR(31)>, 
168 A& 3 TLOTRTOP PTR(31), 
172 AC 3 TLOTRTIP PTR(31), 
176 BO 3 TLOTADP PTR(31), 
180 BS 3 * PTR(31), 
184 B8& 3 TLOUSER1 PTR(31)> 
188 BC 3 TLDUSER2 PTR(31)> 
192 co 3 TLOUSER3 PTR(31)> 
196 C4 2%, 
196 C4 3 TLDFUNC BIT(64), 
196 C4.0 4 TLONOPK BIT(1), 
196 C4.1 4 TLOREDK BIT(1); 
196 C4.2 G TLDOSPLK BIT(1)> 
196 c4.3 4 TLDOSHWFK BIT(1), 
196 C4.4 & TLOCSRK BIT(1)>, 
196 C4.5 G TLOPRTHK BIT(1)> 
196 C4.6 & TLDOPRTLK BIT(1); 
196 C4.7 G BIT(l), 
197 €5.0 G TLOLNEK BIT(1), 
197. =6C5.1 4 TLOCMDK BIT(1); 
197 = €5.2 4 TLONOPMK BIT(1);, 
197 C5.3 4 TLOKHLPK BIT(1); 
197 C€5.4% & TLDRETK BIT(1); 
197 =6C5.5 G * BIT(3)>, 
198 C6.0 G TLDENOK BIT(1)>, 
198 §6Cé6.1 & TLDENTK BIT(1)>, 
1938 €6..2 & TLOSHMK BIT(1), 
198 C6.3 Gq * BIT(5)>, 
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7* 
/* 
/*® 
7* 
7% 
7* 
7* 
7* 
7* 
/* 
7% 
7* 
7* 
7* 
/* 
7* 
7% 
7* 
7* 
7% 
7* 
7* 
7* 
/* 
7% 
/* 
7* 
7* 
7* 
7* 
7* 
7* 
7* 
7* 
7* 
/* 
7% 
7* 
7% 
/* 
7* 
/* 
7% 
/* 
/* 
/* 
/* 
7* 
/* 
7* 
7* 
7* 
/* 
7* 
/* 
/* 
/* 
7% 
7% 
7* 
7* 
7* 
7* 
7% 


FIELD 
DESCRIPTION 
LOGICAL DISPLAY %/ 
TABLE ID ‘TLD’ #/ 
TLO ID ('O','L','2") %/ 
NEXT TLD PTR %/ 
RETURN CODE */ 
PROLOG CODE INTERFACE */ 
EPILOG CODE INTERFACE %/ 
%% RESERVED i %/ 
#% RESERVED %/ 
SAVEAREA INTERFACE */ 
CONTROL/PROCESS INTERFACE */ 
TCB (TASK CNTL BLK) PTR */ 
DISPLAY REQUEST ECB %/ 
PROCESS REQUEST ECB */ 
TASK COMPLETION ECB */ 
INTERFACE FOR CONTROL */ 
STAX POST ECB */ 
STAX POST TCB */ 
#% RESERVED %/ 
SPF SYSTEM TABLES PTRS / 
TCM (CMD TABLE? ENTRY PT#/ 
TCT (CONT TBLS TBL) PTR */ 
TOS (DATA SETS) PTR %/ 
TKV (KEY/VALUE TBL) PTR */ 
TKW (KEY-HORD TBLS) PTR */ 
TSC (COMMON SUBS) PTR */ 
TSI (SYS INTERFACE) PTR */ 
TSV (SPF VARIABLES) PTR */ 
TXC (TERM EXIT TBL) PTR */ 
*#% RESERVED 3 / 
SPF PROCESSOR TABLES PTRS */ 
MENU HANOLER BUFFER PTR */ 
TFO CONTROL CARD PTR %/ 
TFD LISTING PTR */ 
TFD EDIT BACKUP PTR %/ 
TFK (FUNCT/KEY) PTR %/ 
TLS (LOGIC SCREEN) PTR */ 
TRT ZEROS TBL PTR */ 
TRT IDENTITY TBL PTR %/ 
TAD (ALLOC DDNAMES) PTR */ 
¥% RESERVED 3% */ 
USER FIELD # 1 %/ 
USER FIELD # 2 %/ 
USER FIELD # 3 %/ 
DISPLAY/SCREEN INTERFACE */ 
KEY FUNCTION BITS / 
NOP */ 
REDISPLAY %/ 
SPLIT %/ 
SWAP */ 
CURSOR %/ 
PRINT HIGH */ 
PRINT LOW */ 
¥% RESERVED *% */ 
LINE CONMAND */ 
PRIMARY COMMAND %/ 
NOP WITH MESSAGE */ 
HELP %/ 
RETURN / 
**% RESERVED 3 */ 
END */ 
ENTER */ 
ENTER/SESS MGR MODE #/ 
*#% RESERVED %/ 


(CONTINUED ON NEXT PAGE) 


TLD 


LICENSED MATERIAL - PROPERTY OF IBM 


TKY - KEYRORD/VALUES TABLE 


OFFSET FIELD 
DEC HEX NAME 
0 0 1 TKV BASED; 
0 0 2 TKVHEAD, 
0 0 3 TKVID CHAR(8&), 
0 0 Gq * CHAR(6)> 
6 6 4 TKVVID CHAR(2), 
8 & 3 TKVLEN FIXED(15), 
10 A 3 TKVUSED FIXED(15), 
12 Cc 3 TKVFIXED FIXED(15), 
14 E 3 TKVFLAGS BIT(16), 
14 E.0 Gq * BIT(6); 
14 E.6 @ TKVNOUPD BIT(1), 
14 E.7 @ TKVNV2 BIT(1)> 
15 F.0 q BIT(7); 
15 F.7 4 TKVFULL BIT(1), 
16 10 3 FIXED( 31); 
200 os«d14 2 TKVENTS CHAR(*), 


TKVENTRY — KEYWORD-VALUE TABLE ENTRY (TKVDCLS) 


OFFSET FIELD 
DEC HEX NAME 


1 TKVENTRY BASED, 
2 TKVEHEAD» 
3 TKVVALLN FIXED (8); 
3 TKVNAMLN FIXED (8), 
2 TKVNAME CHAR (#);5 


Ne OO CG 
Ne OO So 


LICENSED MATERIAL - PROPERTY OF IBM 


/* 
7% 
/* 
/* 
/*% 
/* 
/%* 
/* 
/*® 
(7% 
7% 
/* 
7* 
/* 
/* 
/% 
7% 


7% 
7% 
7% 
/* 
7* 


FIELD 

DESCRIPTION 
*/ 
TKV HEADER %/ 
IDENTIFICATION */ 
TABLE ID */ 
SPF VERSION ID %/ 
TOTAL LENGTH OF TKV %/ 


OFFSET TO LAST USED BYTE*/ 
OFFSET PAST LAST FIXED ¥*/ 


FLAGS */ 
**% RESERVED *% */ 
ON -> NOT WRITEABLE ¥*/ 
ON -> NOT VER 2 */ 

(VER 2.2 OR GREATER }*/ 

*#* RESERVED */ 
ON -> TKV OVERFILLED ¥*/ 
*% RESERVED */ 


FIRST KEYWORD/VALUE ENTRY */ 


FIELD 

DESCRIPTION 
FORMAT OF KEYWD-VAL ENTRY */ 
ENTRY HEADER */ 
LENGTH OF VALUE */ 
LENGTH OF KEYRORD %/ 
KEYRKORD NAME */ 


DATA AREAS 


TKY 


341 


TLD 


OFFSET 


DEC 
277 
278 
279 
280 
288 
292 
296 
300 
301 
304 
308 
312 
316 
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HEX 


115 
116 
117 
118 
120 
124 
128 
12c 
12D 
130 
134 
138 
13¢€ 


- LOGICAL DISPLAY TABLE ( CONTINUED ) 


FIELD 
NAME 


WWW Woo Uo WW ot Wt ol 


xx Kx & 


TLOTFKIO 
TLDOTCBID 
TLOFORBT 
TLOPHENU 
TLOPMSG 

TLOCSHCA 
TLOTMBP 

TLOBATCT 


CHAR(1), 
CHAR(1), 
CHAR(1)> 
CHAR(8)>, 
CHAR(4), 
PTR(31); 
PTR(31)> 


FIXED(8), 


CHAR(3), 
PTR(31), 
PTR(31)>, 
PTR(31)>5 
PTR(31)3 


/* 
/* 
/* 
/* 
/* 
7* 
7* 
/* 
/* 
/* 
/* 
/* 
/* 


LICENSED MATERIAL - PROPERTY OF IBM 


FIELD 
DESCRIPTION 
TFK ID (A,B,C) */ 
TCB ID (0,1,2) *#00S#/ 
OPT 4/5 FLAG (F,B) *CMS#/ 


PREV MENU FROM CDISPL */ 
LAST MSG FROM CMSG */ 
CSM AUTO STOR ADDR %/ 
TASK MGT BLOCK PTR ¥*CMS*/ 
BATCH NAME GEN NUM *CMS#/ 


¥% RESERVED %/ 
¥% RESERVED i #7 
#% RESERVED 3 */ 
## RESERVED i %/ 
#% RESERVED %i %/ 


& 


tie 


TLO 
OFFSET 
DEC HEX 
199 §=C7.0 
199 C7.0 
199 = C7.1 
199 C7.2 
199 =C7.3 
199 C7.4 
199 =C7.5 
199 3=C7.6 
20¢)=—« CC 
204 CC.0 
204 § CC.1 
204 CC.2 
204)=—s« CC.. 3 
204 =6CC..4 
204 CC.5 
204 )~=—s«CC..6 
204 CC.7 
205 Cco.0 
205 cCod.1 
205 CD.2 
205 Cd.3 
205 Cd.4¢ 
205 Cd.5 
206 CE.0 
206 =«CE.1 
206 CE.2 
206 CE.3 
207 8=CF.0 
207 CF.0 
207 8CF.1 
207 8=6CF.2 
207 86CF.3 
207 CF.4 
207 CF.5 
207 CF.6 
212 D4 
213. D5 
213 D5.0 
213. =D5.1 
213. + D5.2 
213. -DS5.3 
213. D5.4 
213. D5.5 
213. +D5.6 
213. D5.7 
214 ~=—«O6.. 0 
214~=—s«6. 1 
214 «=D6.2 
214 «#D6é.3 
215 O07 
2160 =—s«i»8 
220 0 8=6—DCc 
224 ~—s« E00 
228 £4 
232 ~—=— CES 
236 = EC 
240 ~=2FO 
244 =F G4 
244 = FG 
252 FC 
260 104 
264 108 
268 10C 
272 110 
276 114 


LICENSED MATERIAL ~- PROPERTY OF IBM 


- LOGICAL DISPLAY TABLE (CONTINUED ) 


FIELD 
NAME 


4 TLDSCRK BIT(4), 
5 TLOSCRUK BIT(1), 
5 TLOSCRDK BIT(1), 
5 TLDOSCRLK BIT(1), 
5 TLOSCRRK BIT(1); 


4& TLDFNDK 
4 TLOCHGK 
G * 


BIT(1), 
BIT(1); 


BIT(34)> 


TLOENSL BIT(64), 


TLONOPE 
TLDREDE 
TLOSPLE 
TLOSKPE 
TLOCSRE 
TLDOPRTHE 
TLDFRTLE 
* 
TLOLNEE 
TLOCNDE 
TLONOPNE 
TLOHLPE 
TLDRETE 
1d 
TLDENDE 
TLDENTE 
TLOSMNE 
% 
TLOSCRE 


SPHHHHE HHS HHH HHH HH HHS 


BIT(1), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(3), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(5), 
BIT(4), 


5 TLOSCRUE BIT(1), 
5 TLOSCRDE BIT(1)> 
5 TLOSCRLE BIT(1), 
5 TLOSCRRE BIT(1), 

4 TLOFNDE BIT(1), 

4 TLOCHGE BIT(1), 

q * BIT(34), 


BIT(8), 
BIT(16); 


TLDALARM 
TLOTUT 
TLDNODSP 
TLOTFKLK 
TLOMERRC 
TLOPRIOP 
TLDSAFLG 
TLD998 
TLDSTAX 
TLDSTAX6 
TLODFREE 


BIT(1), 
BIT(1)> 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(1)>, 
BIT(1), 
BIT(1)>, 
BIT(1), 
BIT(1), 


j 


! 


% 


KPPHEHHHHH HHH HL * 


TLOCSR 
TLDCPSRL 
TLOCPSSZ 
TLOMLSSZ 
TLOCLSSZ 
TLDOMDTCT 
* 

’ 
TLOPOPTN 
TLOHELP 
TLDSCANT 
TLDREPCT 
TLDIDAS5P 
TLDOINSIZ 
TLDEBUID 


WU UK UW OU OF OI Oi 


Wi 


BIT(5), 
BIT(8), 
FIXED(31)> 
FIXED(31)> 
FIXED(31)> 
FIXEO(31), 
FIXED(31)+ 
FIXED(31), 
FIXED(31)>5 


CHAR( 8), 
CHAR(8), 
CHAR(4), 
FIXED(31); 
PTR(31), 
FIXED( 31), 
CHAR(1)> 


FIELD 
DESCRIPTION 


SCROLL KEYS 
SCROLL UP 
SCROLL DOWN 
SCROLL LEFT 
SCROLL RIGHT 

REPEAT FIND 

REPEAT CHANGE 

*% RESERVED 


ENABLED KEY FUNCT BITS 


NOP 

REDISPLAY 

SPLIT 

SWAP 

CURSOR 

PRINT HIGH 

PRINT LOW 

*#% RESERVED 

LINE COMMAND 

PRIMARY COMMAND 

NOP RITH MESSAGE 

HELP 

RETURN 

** RESERVED *% 

END 

ENTER 

ENTER/SESS MGR MODE 

*% RESERVED %% 

SCROLL KEYS 
SCROLL UP 
SCROLL DOWN 
SCROLL LEFT 
SCROLL RIGHT 

REPEAT FIND 

REPEAT CHANGE 

*% RESERVED ** 


*/ 
*/ 
*/ 
%/ 
%/ 
*/ 
%/ 
%/ 
*/ 
*/ 
%/ 
%/ 
/ 
*/ 
*/ 
*/ 
%/ 
*/ 
%/ 
*/ 
%/ 
%/ 
*/ 
%/ 
%/ 
%/ 
*/ 
%/ 
*/ 
%/ 
%/ 
%/ 
%/ 
%/ 
*/ 


LOGICAL ATTENTION ID */ 


MISC FUNCTION BITS */ 
ALARM BIT */ 
TUTORIAL FLAG (TUT) */ 
NO DISPLAY REQUESTED */ 
TFK LOCK BIT */ 
MERR CALLING MHA */ 
PRIM OPT FLAG (PMD) */ 
SCROLL AMT FLAG */ 


998 ABEND RESTART FLAG*/ 


CAT STAX FLAG */ 
OPTION 6 STAX FLAG */ 
CAT DD FREE SWITCH %/ 
*#% RESERVED ¥% */ 
#% RESERVED ¥% %/ 
CURSOR (REL-LOC) */ 


CURR PRYS SCR REL-LOC ¥*/ 
CURR PHYS SCREEN USED #*/ 
MAX LOGIC SCREEN SIZE */ 
CURR LOGIC SCREEN SIZE ¥*/ 
MODIFIED DATA TAG CNT ¥*/ 
*%% RESERVED */ 
MISCELLANEOUS INTERFACE */ 
RETURN (PRIMARY OPTION) */ 
CURR KELP (NENBER) NAME */ 
CURRENT SCROLL AMOUNT ¥*/ 


REPEAT END COUNT */ 
PRIM INPUT FLD ATTR BYTE*/ 

PTR AND DATA LEN %/ 
EDIT BACKUP TFD ID %/ 


(CONTINUED ON NEXT PAGE) 


DATA AREAS 


TLD 
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TPD - PHYSICAL DISPLAY TABLE 
OFFSET FIELD. 
DEC HEX NAME 
0 0 1 TPD BASED 
BOUNDARY (DWORD)>» 
0 0 2% CHAR(8) ». 
8 8 2 -  BOUNDARY(DWORD), 
8 8 3 TPDLASTT CHAR(8); 
16 610 3 TPDTPUTT CHAR(8), 
24 «#618 3 TPDFROCT CHAR(8), 
32 «20 3 TPDTGETT CHAR(8), 
40 28 2 TPDAID BIT(8), 
41 29 2 * BIT(8), 
41 29.0 3 TPDRDISP BIT(1)> 
41 29.1 3 TFDRSTPS BIT(1)> 
41 29.2 3 TPDRDLIO BIT(1), 
41 29.3 3 TPDMSGON BIT(1)>, 
41 29.4 3 TPDMSGAL BIT(1), 
41 29.5 3 TPDFSINT BIT(1), 
41 29.6 3 * BIT(2), 
42 2A 2 * CHAR(2), 
44 2C 2 TPDCSR FIXED(31);, 
48 30 2, 
48 30 3 TPDTPSSZ FIXED(31), 
5234 3 TPDTPSP PTR(31); 
560 38 3 * FIXED(31)> 
60 3C 2 *, 
60 3C 3 TPDTSBSZ FIXED(31), 
64 40 3 TPDTSBP PTR(31), 
68 44 3 % FIXED(31)»> — 
72 48 2 *, 
72 48 3 TPDTLDC FIXED(31); 
76 4 3 TPDFTLDP PTR(31), 
80 850 3 TPOPTLDP PTR(31); 
84 54 3 TPDDTLDP PTR(31), 
8&8 58 3 % FIXED( 31)» 
92 5C 2 , 
92 =5C 3 TPDPUTCT FIXED(31), 
96 60 3 TPDPUTSZ FIXED(31); 
100 8664 3 TPDGETCT FIXED(31); 
104 68 3 TPDGETSZ FIXED(31)>, 
108 6C 2 TPOMSGP PTR(31), 
112. 970 2 TPDCSMGP PTR(31);, 
116 74 2 TPDCSMGL PTR(31); 
120 78 2 # PTR(31)>, 
124 7C 2 * PTR(31)3 


TPB 


FIELD 
DESCRIPTION 
/* PHYSICAL DISPLAY TABLE */ 
/* */ 
/* TPD IDENTIFICATION / 


/* TIMES CIN MICRO-SECONDS) *#/ 
7% LAST TIME (FROM STCK) #7 


/*%  TPUT TIME (TOTAL) %/ 
/* PROCESSING TIME (TOTAL) */ 
/* TGET TIME (TOTAL) a/ 
/* LOGICAL ATTENTION AID *%/ 
/* CONTROL BITS */ 
/7*  REDISPLAY SCREEN */ 
/* RESTORE TPS %/ 


7%  REDISPLAY AFTER LINE I/0*/ 
/* SMC ERR/INFO MSG FLAG ¥*/ 
/* SMC ERR/INFO MSG ALARM ¥*/ 


/*% FULL SCREEN INIT ¥CMS#/ 
/*% **% RESERVED */ 
/* #% RESERVED #% */ 
7* CURSOR (REL-LOC) %/ 
7* PHYS SCREEN INTERFACE */ 


/*% TPS (PHYS SCREEN) SIZE */ 
7% TPS (PHYS SCREEN) PTR ¥*/ 
7% *%* RESERVED */ 
7% SCREEN BUFFER INTERFACE */ 
/* TSB (SCREEN BUFF) SIZE */ 
7* TSB (SCREEN BUFF) PTR */ 
7% *% RESERVED 33 %/ 
/* LOGICAL DISPL INTERFACE */ 
7* TLD (LOGIC DISPL) CNT ¥*/ 


/* FIRST TLD PTR %/ 
7% PRIMARY TLD PTR */ 
7*® DUMMY (SMC'S) TLD PTR */ 
/*% *% RESERVED 33 %/ 
/* PHYSICAL SCREEN I/O COUNTS*/ 
/*%  TPUT COUNT %/ 
/*% TOTAL TPUT BYTES */ 
7% TGET COUNT %/ 
7% TOTAL TGET BYTES %/ 


/%* SMC ERROR/INFO MSG PTR */ 
7% CLEAR SCREEN TPUT DATA %/ 
7% CLEAR SCREEN TPUT DATA LEN*/ 
7* *#% RESERVED %/ 
/*% ¥% RESERVED ¥# %/ 


LICENSED MATERIAL ~- PROPERTY OF IBM 


TLS 


OFFSET 
DEC §WEX 
0 0 
0 0 
0 0 
0 0 
1 1 
1 1 
8 & 
56 38 
56 § 38 
63 3F 
70 =—46 
7. (47 
74 = GA 
75 =648 
7&6 GE 
60 50 
80 3=—50 
142 ~3=8E 
142 = BE 
143. 8F 
154 «(OA 
154 9A.0 
154 = _-« 9A..2 
154 9A.3 
155 96 
159 OF 
160 Ad 
160 8 A0 
160 AO 
161 Al 
238 ~=2CEE 
239 ~—séEF 
240 ~=6FO 


LICENSED MATERIAL ~- PROPERTY OF IBM 


- LOGICAL SCREEN TABLE 


FIELD 
NAHE 


1 TLS 


BASED, 


2 TLSWEAD, 


3 TLST 


4 
4 


CHAR( 80); 
TLSTAB BIT(8), 
TLSTITLE CHAR(55), 

5 TLSTFUNC CHAR(7), 
5 TLSTDSN CHAR(48), 


4 TLSMSG CHAR(24), 
5 * CHAR( 7), 
5 TLSCLABL CHAR(7), 
5 % CHAR(1); 
§ TLSLCOL CHAR(3), 
5 # CHAR(1), 
§ TLSRCOL CHAR(3); 
5 * CHAR(2), 

3 TLSI CHAR( 80); 
G * CHAR(62), 
4 TLSS, 


5 TLSSLAB BIT(8); 
5 TLSSLABL CHAR(11), 
5 TLSSAAB BIT(8); 


6 * BIT(2), 
6 TLSSAMOT BIT(1), 
6 % BIT(5), 


5 TLSSAMT CHAR(4), 
5 TLSSFAB BIT(8), 


2 TLSBODY CHAR(3280), 


3 TLSHELP CHAR(80), 
4 TLSHLPAB BIT(8), 


4% TLSHLPDA CHAR(77), 


4 TLSHLPA2 BIT(8), 
4 TLSHLPEN CHAR(1), 
3 TLSTEXT CHAR(*); 


/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
7* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 


FIELO 


DESCRIPTION 


LOGICAL SCREEN 
HEADER AREA OF DISPLAY 


TITLE LINE 
TITLE ATTR BYTE 
TITLE DATA 


FUNCTION CEDIT/BRO) 


DATASET NAME 
MESSAGE DATA 
(DASHES } 
COLUMN LABEL 
(BLANK ) 
LEFT COLUMN 
(BLANK) 
RIGHT COLUMN 
(BLANKS) 
INPUT LINE 
PRIMARY INPUT AREA 
SCROLL FIELDS 
LABEL ATTR BYTE 
SCROLL LABEL 
AMOUNT ATTR BYTE 
* 


MOD DATA TAG 
* 
SCROLL AMOUNT 
FINAL ATTR BYTE 


BODY AREA OF DISPLAY 


HELP LINE 
HELP ATTR BYTE 
HELP DATA 
HELP END ATTR BYTE 
HELP END DATA 
MAIN TEXT AREA 


DATA AREAS 


*/ 
%/ 
*/ 
*/ 
%/ 
*/ 
%/ 
/ 
*/ 
%/ 
*/ 
%/ 
/ 
*/ 
*/ 
*/ 
*/ 
*/ 
*/ 
*%/ 
%/ 
*%/ 
*/ 
*/ 
*/ 
*/ 
%/ 
*/ 


TLS 


345 


TSsc - SUBROUTINES (COMMON) TABLE (CONTINUED) . TSC 


OFFSET FIELD FIELD 

DEC HEX NAME DESCRIPTION 

400 190 2 TSCPTR(098) PTR(31}, /*% ADDRESS OF EPP */ 
404 194 2 TSCPTR(099) PTR(31), /* ADDRESS OF EPO #/ 
408 198 2 TSCPTR(100) PTR(31), /* ADDRESS OF EPS %/ 
412 19C 2 TSCPTR(101) PTR(31), 7% ADDRESS OF ETX / 
416 1A0 2 TSCPTR(102) PTR(31), /* ADDRESS OF ETC %/ 
428 I1AC 2 TSCPTR(105) PTR(31), /* ADDRESS OF EPR %/ 
432 150 2 TSCPTR(106) PTR(31), /* ADDRESS OF EDI %/ 
436 154 2 TSCPTR(107) PTR(31)>, /* ADDRESS OF EDO */ 
440 188 2 TSCPTR(108) PTR(31), /* ADDRESS OF EFR %/ 
444 1BC 2 TSCPTR(109) PTR(31), /*% ADDRESS OF EPD %/ 
448 1C0 2 TSCPTR(110) PTR(31), 7% ADDRESS OF EPC %/ 
452 1C€4 2 TSCPTR(111) PTR(31), /* ADDRESS OF EPI %/ 
456 I1C8 2 TSCPTR(112) PTR(31)> /*% ADDRESS OF EPF %/ 
460 ICC 2 TSCPTR(113) PTR(31), 7* ADDRESS OF EFC %/ 
468 I1D4 2 TSCPTR(115) PTR(31); 7% ADDRESS OF EGN */ 
472 108 2 TSCPTR(116) PTR(31);, /* ADDRESS OF EGR */ 
476 1DC 2 TSCPTR(117) PTR(31), /* ADDRESS OF EML %/ 
480 1E0 2 TSCPTR(118) PTR(31), 7% ADDRESS OF EFT %/ 
484 1E4 2 TSCPTR(119) PTR(31), /* ADDRESS OF EST %/ 
488 l1E8 2 TSCPTR(120) PTR(31)> /* ADDRESS OF EBI %/ 
492 l1EC 2 TSCPTR(121) PTR(31)> /* ADDRESS OF EBS */ 
496 1F0 2 TSCPTR(122) PTR(31)>, /* ADDRESS OF EBX %/ 
500 1F4 2 TSCPTR(123) PTR(31)> /* ADDRESS OF EBE %/ 
504 1F8 2 TSCPTR(124¢) PTR(31), /* ADDRESS OF EBA %/ 
508 1FC 2 TSCPTR(125) PTR(31)> /* ADDRESS OF EBR */ 
528 210 2 TSCPTR(130) PTR(31), /* ADDRESS OF ECD %/ 
532 214 2 TSCPTR(131) PTR(31), /* ADDRESS OF ETL */ 
548 224 2 TSCPTR(135} PTR(31), /* ADDRESS OF ERA %/ 
552 228 2 TSCPTR(136) PTR(31), /*%  ACDRESS OF ERC %/ 
556 22C 2 TSCPTR(137) PTR(31), /* ADDRESS OF ERD %/ 
560 230 2 TSCPTR(138) PTR(31), /7* ADDRESS OF ERF %/ 
564 234 2 TSCPTR(139) PTR(31), 7% ADDRESS OF ERI %/ 
568 238 2 TSCPTR(140) PTR(31), /*% ADDRESS OF ERN %/ 
572 23C 2 TSCPTR(141) PTR(31)>, /* ADDRESS OF ERO */ 
576 240 2 TSCPTR(142) PTR(31)> /* ADDRESS OF ERR %/ 
580 244 2 TSCPTR(143) PTR(31); /* ADDRESS OF ERS / 
584 248 2 TSCPTR(144) PTR(31), /* ADDRESS OF ERX */ 
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LICENSED MATERIAL - PROPERTY OF IBM 


~e 


LICENSED MATERIAL - PROPERTY OF IBM 


TSC 
OFFSET 
DEC HEX 

0 0 

0 0 

& & 
12 Cc 
16 810 
20014 
24 «618 
26 61C 
32 0=— 20 
360 24 
40 828 
44 2C 
48 30 
52 34 
56 = 338 
60 3C 
64 40 
68 44 
72 3848 
7 84 
60 50 
84 54 
8&8 58 
92 5C 
96 60 
100 = 64 
104 38668 
108 6C 
112270 
116 = 74 
120078 
124 7C 
128 80 
132 884 
1360S 88 
140 &C 
144 =990 
148 86094 
152 (498 
156 869C 
160 AO 
168 A& 
172. AC 
176 =O 
180 = BS 
184 BS 
18& =6BC 
192 CO 
196 C4 
200 86Cc8 
204 «6€6CC 
208 DO 
212 D4 
216 DS 
220060 
224 ~=—EO 
228 £4 
232.—Ci«E 
252 FC 
256 100 
260 104 
328 148 
332 14C 
392 188 
396 16C 


= SUBROUTINES (COMMON) TABLE 


FIELD 
NAME 


1 TSC 


NNN NNN NNNANN NNN NNN NNN NONNANNN NNN NNN NMN NDNA NNN ANNAN NMN NIN DANN NANA NNN AN NNN HNN 7 


TSCID 


BASED BOUNDARY( WORD}, 
CHAR(8); 


TSCLEN FIXED(31);, 


TSCPTR( 001) 
TSCPTR( 002) 
TSCPTR( 003) 
TSCPTR( 004) 
TSCPTR( 005) 
TSCPTR(006 ) 
TSCPTR(007) 
TSCPTR( 008) 
TSCPTR(009) 
TSCPTR( 010) 
TSCPTR(O11) 
TSCPTR( 012) 
TSCPTR(013) 
TSCPTR( 014) 
TSCPTR(015) 
TSCPTR( 016} 
TSCPTR( 017) 
TSCPTR(018) 
TSCPTR(019) 
TSCPTR(020) 
TSCPTR(021) 
TSCPTR(022 ) 
TSCPTR(023) 
TSCPTR( 024) 
TSCPTR(025 ) 
TSCPTR(026) 
TSCPTR(027) 
TSCPTR(028) 
TSCPTR(029) 
TSCPTR(030) 
TSCPTR(031) 
TSCPTR( 032) 
TSCPTR( 033) 
TSCPTR( 034) 
TSCPTR(035) 
TSCPTR{ 036 ) 
TSCPTR( 037) 
TSCPTR(038) 
TSCPTR( 040) 
TSCPTR(041) 
TSCPTR( 042) 
TSCPTR(043) 
TSCPTR (044) 
TSCPTR(045) 
TSCPTR( 046 ) 
TSCPTR( 047) 
TSCPTR( 048) 
TSCPTR( 049 ) 
TSCPTR(050) 
TSCPTR( 051) 
TSCPTR( 052) 
TSCPTR( 053) 
TSCPTR( 054) 
TSCPTR(055 ) 
TSCPTR( 056) 
TSCPTR( 061) 
TSCPTR( 062) 
TSCPTR( 063) 
TSCPTR( 080 ) 
TSCPTR( 081 ) 
TSCPTR( 096 ) 
TSCPTR(097) 


PTR(31), 
PTR(31), 
PTR(31)>, 
PTR(31); 
PTR(31), 
PTR(31); 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31)> 
PTR( 31), 
PTR(31), 
PTR(31)> 
PTR(31), 
PTR(31); 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR( 31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR( 31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR( 31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR(31), 
PTR( 31), 
PTR(31), 
PTR(31), 
PTR(31); 
PTR(31)5 
PTR(31)> 
PTR(31), 
PTR(31)>, 
PTR(31)>, 
PTR(31)> 
PTR(31)> 
PTR(31)>, 
PTR(31)5 
PTR(31)> 
PTR(31), 
PTR(31), 


FIELD 


DESCRIPTION 


7* TSC (SYS COMMON SUBS) TBL */ 
IDENTIFICATION "TSCX" #7 
LENGTH OF TCS 


‘* 
/* 
7* 
/* 
7* 
/* 
7* 
/* 
7* 
7* 
7* 
7* 
7* 
/* 
7* 
7* 
/* 
/* 
/* 
/* 
7% 
7* 
/* 
/* 
7* 
/* 
/* 
7* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
7* 
/* 
/7* 
7* 
7* 
/* 
7* 
/* 
/* 
/* 
7* 
/* 
/* 
/* 
/* 
7® 
/* 
/* 
/* 
7*® 
7* 
/* 
/* 
7% 
/* 
/* 
7* 


ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 
ADDRESS 


(CONTINUED ON NEXT PAGE) 


OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 
OF 


CAT 
CBC 
CBDSN 
CBF 
CEG 
CBR 
CBS 
CCB 
CcD 
CCP 
ccs 
CDA 
CDAIR 
CDATE 
coc 
COERR 
COF 
CDG 
CDISPL 
coo 
CDP 
CDT 
CERR 
CFI 
CHC 
CHELP 
CHPJ 
CHPL 
CIR 
CIV 
CJC 
CJF 
CJN 
CKVGET 
CKVPUT 
CLM 
CLOG 
CHB 
CML 
CMSG 
CPRINT 
CRELS 
CRESV 
CSB 
CSCROLL 
CSM 
CTA 
CTF 
CTGET 
CTPUT 
cTl 
CT2 
CUPARMS 


*/ 
*/ 
*/ 
*/ 
*/ 
*/ 
*/ 
*/ 
*/ 
*%/ 
*/ 
%/ 
%/ 
%/ 
*/ 
%/ 
*/ 
%/ 
*/ 
*/ 
*/ 
%/ 
*/ 
*/ 
%/ 
*/ 


DATA AREAS 


TSC 
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TSI 
OFFSET 
DEC HEX 
136 86 88 
136 0 8=— 88 
137 89 
138 8A 
1440) &C 
144 90 


- SPF INTERFACE TABLE (CONTINUED) 


FIELD 
NAME 


2 #, 
3 TSISPCL1 CHAR(1), 
3 TSISPCL2 CHAR(1), 
3 # CHAR(2); 
2 TSIDDNN FIXED(31), 
2 (16) FIXED(31)3 
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7* 
7* 
/* 
7% 
7* 
7% 


LICENSED MATERIAL - PROPERTY OF IBM 


FIELD 
DESCRIPTION 
SPOOL CLASS ¥CMS#/ 
FOR TLD *CMSH/ 
FOR TLD2 *CMNS#/ 


##% RESERVED #3 #CMS#/ 
DONAME NUNBER ( SPFXXXXX )*/ 
#% RESERVED */ 


TS! 


c 


LICENSED MATERIAL - PROPERTY OF IBM 


TSI 
OFFSET 
DEC HEX 
0 0 
0 0 
& & 
16 10 
16 10 
200—«14 
24 «618 
26 IC 
32.020 
360 24 
40 8628 
44 2C 
48 30 
52 34 
56 § 38 
60 =3C 
64 40 
68 44 
68 44 
72 = =48 
76 «64 
80 3=—ss 50 
84 54 
8 58 
92. 
96 60 
100 64 
104 = 68 
108 é6C 
110 = 6E 
lll = 6F 
ll2 70 
ll2 70.0 
ll2 = 70.1 
1l2 = 70.2 
ll2 = 70.3 
l1l2 70.4 
ll2 70.5 
ll2 70.6 
113) 71 
113) 71.0 
113) 71.1 
ll3) 71.2 
113) 71.3 
113. 71.4 
113) 71.5 
114s 72 
1143 = 72.0 
11¢—s 72.1 
114 72.2 
114s 72.3 
114 72.4 
114 72.5 
114s 72.6 
115-73 
116 = 74 
124 «=6©7C 
128 8&0 
132 «84 
132 84 
133 = 85 
134 86686 


- SPF INTERFACE TABLE 


FIELD FIELD 
NAME DESCRIPTION 
1 Sst BASED, 7% SYSTEM INTERFACE %/ 
2 * CHAR(8), 7* TSI IDENTIFICATION */ 
2 TSIVRMZ CHAR(8), 7% SPF VER/REL/MOD/ZAP LVL */ 
2 TSISYSP, 7* TSI PTRS IN TLD */ 
3 TSITCMP PTR(31), 7% CMD TABLE ENTRY POINT */ 
3 TSITCTP PTR(31), /* CONTLER TBLS TBL PTR */ 
3 TSITDSP PTR(31), /* DATA SET TABLE PTR */ 
3 TSITKVP PTR(31)> /* KEY/VAL TABLE PTR */ 
3 TSITKHP PTR(31), /* KEYWORD TABLE PTR */ 
3 TSITSCP PTR(31), /* COMMON SUB PTRS */ 
3 TSITSIP PTR(31), /* SYS INTERFACE PTR */ 
3 TSITSVP PTR(31), /* SYS VARIABLES PTR #/ 
3 TSITXCP PTR(31), /* TERM EXIT TABLE PTR ¥*/ 
3 PTR(31), 7* #% RESERVED *% */ 
2 TSITPDP PTR(31), 7* PHYSICAL DISPLAY PTR */ 
2 TSITFKP PTR(31), 7% CURRENT MASTER TFK PTR ¥*/ 
2 TSIDEVNP PTR(31), /* DEVICE NAME TABLE PTR */ 
2 TSITSOPL, 7* TSO PARM LIST #/ 
3 TSICBUFP PTR(31), /* COMMAND BUFFER PTR %/ 
3 TSIUPTP PTR(31)> /* USER PROFILE TBL PTR */ 
3 TSIPSCBP PTR(31), /* PROT STEP CNTL BLK PTR¥/ 
3 TSIECTP. PTR(31), /* ENVIRON CNTL TBL PTR */ 
2 TSILDCBP PTR(31), 7% SPFLIB DCB PTR */ 
2 TSIPFXP PTR(31)> 7% DATA SET PREFIX PTR */ 
2 TSIDAIRP PTR(31), 7% PTR TO LOADED 'IKJEFDOO'#/ 
2 TSISDWAP PTR(31), /7* SYS DIAGNOSTIC W.A. PTR */ 
2 TSITLMP PTR(31), /*% LOAD MODULE TAB PTR *CHS#/ 
2 TSICCFBP PTR(31); 7*% CCF EXT INT BUF PTR *CMS¥/ 
2 TSICDAF# FIXED(15), 7% CDA DYNMC DDNAME NO *CMS*/ 
2 TSI#FML FIXED(8), 7% NUM MODE LETS AVAIL *CNS*/ 
2 * FIXEO(8), /% #% RESERVED */ 
2 *, 7*® OPERATING SYSTEM %/ 
3 TSIMVS BIT(1); /* ON -> MVS EXECUTING ¥*/ 
3 TSISVS BIT(1), /* ON -> SVS EXECUTING ¥*/ 
3 TSIMVT BIT(1)> /* ON —> MVT EXECUTING ¥*/ 
3 TSIOOS BIT(1); 7* ON —> OTHER OS EXEC */ 
3 TSIAUTH BIT(1)> /* ON —> SPF AUTHORIZED ¥*/ 
3 * BIT(1), /* *% RESERVED *% *00S*/ 
3 BIT(2), /* %% RESERVED ** */ 
2 %, 7% TERMINAL ACCESS */ 
3 TSITCAM BIT(1), /* ON -> TCAM INTERFACE */ 
3 TSIVTAM BIT(1); /* ON —> VTAM INTERFACE #/ 
3 TSIVMALT BIT(1), /* ON -> NDS ALT SZ *®CMS*/ 
3 TSIALT BIT(1), /* ON -> NDS ALT SZ %/ 
3 TSITRACE BIT(1), /* ON —> TERM I/O TRACE */ 
3 BIT(3), /* %* RESERVED 2 */ 
2 TSIMODES CHAR(1), /*% SPF MODES */ 
3 TSIMSGMN BIT(1), /* ON —> MSG/MENU TESTING*/ 
3 TSISTEST BIT(1), /* OFF-> DO SPF STAX */ 
3 * BIT(1), 7* *%# RESERVED %/ 
3 TSISDUMP BIT(1), /* ON -> ALLOW MAIN ABEND*®/ 
3 TSIPOUMP BIT(1), /* ON -—> ALLOW PROC ABEND*/ 
3 TSITREQ BIT(1), /* ON —> TERM TRACE Plog */ 
3 * BIT(2), 7* *% RESERVED ** e/ 
2 TSITFKID CHAR(1), 7*® CURRENT MASTER TFK ID */ 
@ TSIUSRID CHAR(8); 7* TSO USERID (8 CHARS) */ 
2 TSISDATE CHAR(4), 7*% SESSION START DATE */ 
2 TSISTIME CHAR(4), 7*% SESSION START TIME */ 
2 *, 7* EDIT BACKUP TFD CONTROL */ 
3 TSIEBUAF FIXED(8), /* "A" TFD IN USE */ 
3 TSIEBUBF FIXED(8), [* “B’ TFD IN USE */ 
3 * FIXED(15); /* *%% RESERVED *%- */ 
(CONTINUED ON NEXT PAGE) 


DATA AREAS 


TSI 


349 


%/ 
%/ 
%/ 
%/ 
%/ 
%/ 
%/ 


*/ 


%/ 


%/ 


/ 
*/ 
#/ 
«/ 
*/ 
*/ 
%/ 
*/ 
%/ 


*/ 
%/ 
%/ 
%/ 
%/ 
*/ 
%/ 
%/ 
%/ 
%/ 
%/ 
%/ 
%/ 


TSV - SPF VARIABLES TABLE ( CONTINUED ) 
OFFSET FIELD FIELD 
DEC HEX NAME DESCRIPTION 
115 73.4 3 $FNDE BIT(1), /*% REPEAT FIND 
115 73.5 3 SCHGE BIT(1)> /7%* REPEAT CHANGE 
115 73.6 3% BIT(2), /%*% *%*% RESERVED 3% 
116 «74 3 * BIT( 32), /%* *%% RESERVED 
7* 
/* THE FOLLOWING IS SAVED IN 
/* IN THE TKV 
120 78 2 $TSVKV BOUNDARYCWORD), /* 
120 §678 3 $JCHAR CHAR(1), /7* UNIQUE JOB CHARACTER 
121 79 3 $SMM CHAR(1)> /%* SESS MGR MODE (Y,N) 
122 7A 3% CHAR(1)> /* *% RESERVED %% 
123 7B 3 SMODE CHAR(1), /* CHAR MODE (M-MONO,D-DUAL) 
124 7 3 $KEYS CHAR( 2), /* NUM PF KEYS ('12'|'24") 
126 7 3 * FIXED(15), /* *% RESERVED i 
128 —* 80>———--~ 3 SCHARLM CHAR(8) = /* CHAR SET LOAD MOD NAME 
136 0S 88 3 * FIXED(31), 7% *#*% RESERVED %3% 
140 8 3 $DATE CHAR(4), /* DATE & TIME PARMS LAST 
144 90 3 $TIME CHAR(4)> 7% STORED (TIME MACRO FORM)}#/ 
148 94 3 $LST, /* SPFLIST INFORMATION 
148 4 4 S$LSTPQTY FIXED(31), 7% PRIMARY QUANTITY (PAGES )¥/ 
152 98 4 S$LSTSQTY FIXED(31), 7% SECONDARY QUANTITY (PGS)*/ 
156 §69C 4 $LSTLPP FIXED(31), /* LINES PER PAGE 
160 AQ 4 $SLSTCHAR CHAR(1)>, /* DATA SET UNIQUE CHAR 
161 Al 4 S$LSTIDSP CHAR(1), /* INITIAL DISP (FROM PMD) 
162 A2 4 $LSTFDSP CHAR(1), /* FINAL DISP (FROM OPT) 
163 a3 4& $LSTKEPT CHAR(1), /* KEPT STATUS 'Y'—>YES 
164 AG G * FIXED(31)>, /* %* RESERVED ¥ 
168 As 3 $LoG, /% SPFLOG INFORMATION 
168 A8& 4 SLOGPQTY FIXED(31), /%* PRIMARY QUANTITY (PAGES )#/ 
172 Ac 4 $LOGSQTY FIXED(31), /%* SECONDARY QUANTITY (PGS)*/ 
176 +~BO 4 $LOGLPP FIXED(31), /* LINES PER PAGE 
180 3=—B4 4 $LOGCHAR CHAR(1), /7* DATA SET UNIQUE CHAR 
181 B85 4 $LOGIDSP CHAR(1), /* INITIAL DISP (FROM PMD) 
182 Bé 4 S$LOGFDSP CHAR(1), /* FINAL DISP (FROM OPT) 
183 B7 4 $LOGKEPT CHAR(1), /* KEPT STATUS 'Y'=>YES 
184 BS 4 % FIXED(31), /%*% *% RESERVED 3 
188 BC 3 $USESTAT, /7* USAGE STATISTICS 
188 BC 4 $SESSION FIXED(31), /* COUNT OF SPF SESSIONS 
192 CO 4 SINCNT FIXED(31), /% COUNT INPUT OPERATIONS 
196 C4 4 SINBYTES FIXED(31), /* INPUT BYTE COUNT(TOTAL) */ 
200 C8 4 S$OUTCNT FIXED(31), /* COUNT OUTPUT OPERATICNS */ 
204 CC 4 SOUTBYTE FIXED(31), /%* OUTPUT BYTE COUNT( TOTAL )*/ 
208 obo 4 $PROCTIM FIXED(31)>, /% PROCESSING (TOTAL SECS) */ 
212 D4 4G SUSERTIM FIXED(31), /* USER-THINK (TOTAL SECS) */ 
216 §©6—D8 4 $LOGCNT FIXED(31)>, /%* LOG COUNT 
220 23=6poc a * FIXED(31)> /*% %% RESERVED 
224 €0 q * FIXED(31), /%  #% RESERVED 3 
228 £4 3 $TFK77 CHAR(36), /* MASTER TFK FOR 3277 
264 108 3 $TFK7812 CHAR( 36), /7* MASTER TFK FOR 3278 1L2PFK 
300 12C 3 $TFK7824 CHAR( 36}, /* MASTER TFK FOR 3278 24PFK 
336 150 3 SEBU, /* EDIT BACKUP RECOVER CNTL 
336 150 4 SEBUA FIXED(8)> /* BACKUP "A" CONTROL 
337 151 4 SEBUB FIXED(8)> /% BACKUP "B" CONTROL 
338 152 a # FIXED(15), /* %% RESERVED #4 
340 154 3 SCHAR CHAR(8), /* CHAR SET NAME 
348 15C 3 * CHAR(1)>, /* END OF TSV/TKV AREA 
349 15D 2 * CHAR(3)> /* *% RESERVED *% 
352 160 2 * (4) FIXED(31); /* %#% RESERVED i 
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%/ 
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TSV 
OFFSET 
DEC HEX 
0 0 
0 0 
8 8 
12 Cc 
14 E 
16 #8610 
18 12 
20014 
24 «18 
26 1C 
29 8610 
30 3861E 
31 OF 
32 8=— 20 
34 22 
360 24 
37 Ss 2 
40 28 
44 2C 
44 2c 
48 30 
52 34 
56 8638 
60 3C 
60 3C 
64 40 
68 44 
72 «48 
76 8=6&C 
760 8=64C 
60 =: 550 
8&4 54 
8 58 
92—s S&C 
92. 5C 
96 =660 
100 64 
102 66 
104 = 68 
108 6C 
109 86D 
ll2 70 
112 3 =70.0 
ll2 = 70.1 
112 3870.2 
ll2) = 70.3 
l1l2 = 70.4 
ll2 = =70.5 
112 70.6 
112 70.7 
1130s 72.0 
113) 71.1 
113) 71.2 
113) «71.3 
113) 71.4 
113) 71.5 
114 = 72.0 
114. 72.1 
114 72.2 
114 «72.3 
115 = 73.0 
115s 73.1 
115s 73.2 
115 73.3 


- SPF 


FI 


1 TS 


NNN NNN NNN NNN NNN NN 1 


VARIABLES TABLE 


ELD 
NAME 


V BASED, 
* CHAR(8), 

SMINTGET FIXED( 32) UNSIGNED, 
S$SWAPLIN FIXED(15), 

$SPCOUNT FIXED(15); 

S$SBAINCR FIXED(15); 

SRAINCR FIXED(15), 

$SETPAGE CHAR(4), 

SSETHALF CHAR(4); 

$TCAMNCC CHAR(1), 

SVTAMRKCC CHAR(1), 

$TCSKCC CHAR(1), 

$VCSKCC CHAR(1); 

$TFSON CHAR(2), 

STFSOFF CHAR(2), 

$LINES FIXED(8), 

% CHAR(3); 

* FIXED(31), 

STPL, 


3 $TPLPQTY 
3 $TPLSQTY 
3 $TPLBLKS 
3 % 

$TPC, 

3 $TPCPQTY 
3 $TPCSQTY 
3 S$TPCBLKS 
3 % 
SEBUDS, 

3 $EBUPQTY 
3 $EBUBLKS 


3 $EBUSQTY 
* 


9 
SLSTBLKS 
$LOGBLKS 
$LOGPG 
$LOGLN 
$LOGDATE 
$LOGF LAG 
* 


SNOPE 
SREDE 
SSPLE 
SSWPE 
S$CSRE 
$PRTHE 
SPRTLE 
* 


$LNEE 
SCMDE 
SNOPME 
SHLPE 
SRETE 
* 
$ENDE 
SENTE 
SSMNE 
* 
$SCRUE 
$SCRDE 
$SCRLE 
$SCRRE 
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FIXED( 31), 
FIXED(31), 
FIXED(31), 
FIXED( 31), 


FIXED( 31), 
FIXED(31), 
FIXED(31), 
FIXED(31), 


FIXED( 31), 
FIXED(31)> 
FIXED(31), 
FIXED(31), 


FIXED(31), 
FIXED( 31), 
FIXED(15), 
FIXED(15), 
CHAR(4), 
CHAR( 1), 
CHAR(3), 


ENBL BIT(64), 


BIT(1), 
BIT(1); 
BIT(1); 
BIT(1); 
BIT(1), 
BIT(1);, 
BIT(1), 
BIT(1),; 
BIT(1), 
BIT(1), 
BIT(1); 
BIT(1);, 
BIT(1), 
BIT(3), 
BIF(1), 
BIT(1), 
BIT(1), 
BIT(5), 
BIT(1), 
BIT(1), 
BIT(1), 
BIT(1), 


/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
7* 
/* 
7* 
/* 
7% 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 
7* 
/* 
/* 
/* 
/* 
/* 
7* 
/* 
7* 
7* 
/* 
/* 
7* 
/* 
/* 
/* 
/* 
7* 
/* 
/* 
/* 
/* 
/* 
/* 


FIELD 

DESCRIPTION 
SYSTEM VARIABLES */ 
TSV IDENTIFICATION */ 
MINIMUM TGET DELAY TIME ¥*/ 


SRAP/SPLIT LINE CONTROL ¥*/ 
PRINT SCREEN CONTROL */ 
‘SBA’ OPTIMIZE INCR(4-255 )*/ 
"RA' OPTIMIZE INCR (1-255)*/ 
FULL SCROLL VALUE FOR ‘P' */ 


FULL SCROLL VALUE FCR 'H' */ 
WCC ~- STD TPUT — TCAM */ 
RCC ~ STD TPUT — VTAM %/ 
WCC — CLEAR SCREEN — TCAM */ 


WCC ~- CLEAR SCREEN — VTAM */ 
SPEC SBA ADDRS TO TCAM TO */ 

TURN FULL SCRN ON OR OFF#/ 
NUMB OF LINES FOR DISPLAY */ 
%% RESERVED ** */ 
*% RESERVED x */ 
SPF TEMPLIST INFORMATION */ 

PRIMARY QUANTITY (BLKS) */ 


SECONDARY QUANTITY (BKS)*/ 
BLOCK SIZE */ 
¥% RESERVED %* */ 
SPF TEMPCNTL INFORMATION */ 
PRIMARY QUANTITY (BLKS) #/ 
SECONDARY QUANTITY (BKS)*/ 
BLOCK SIZE */ 
%% RESERVED %/ 
SPF EDIT BACKUP INFO */ 
PRIMARY QUANTITY (BLKS) */ 
BLOCK SIZE */ 
SECONDARY QUANTITY (BKS)*/ 
*% RESERVED */ 
LIST/LOG VALUES (NON TKV) */ 
LIST BLOCK SIZE */ 
LOG BLOCK SIZE */ 
LOG PAGE NUMBER %/ 
LOG LINE NUMBER */ 
LOG CURRENT DATE */ 
LOG FLAG ('A' | ° ') */ 
%% RESERVED %* */ 
INIT KEY/FUN ENABLE BITS */ 
NOP */ 
REDISPLAY */ 
SPLIT */ 
SWAP */ 
CURSOR */ 
PRINT HIGH */ 
FRINT LOW */ 
%* RESERVED *% */ 
LINE COMMAND */ 
PRIMARY COMMAND */ 
NOP WITH MESSAGE */ 
HELP */ 
RETURN */ 
%% RESERVED %* */ 
END */ 
ENTER */ 
ENTER/SESS MGR MODE */ 
%* RESERVED %% %/ 
SCROLL UP %/ 
SCROLL DOWN */ 
SCROLL LEFT %/ 
SCROLL RIGHT %/ 


(CONTINUED ON NEXT PAGE ) 
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UDACOMM 


- UDA COMMON AREA 


FIELD 
DESCRIPTION 


CIV COMMON AREA PTR 
MENU PARMS PTR (0 IN TFD) 
(CDA USES TFDDSNS) 
MSG ID FROM SUBROUTINE 
MSG CURSOR LOC FROM SUB 
MSG PARMS FOR MERR 
MSG PARM 1 FROM SUB 
MSG PARM 2 FROM SUB 
MSG PARM 3 FROM SUB 
SELECTED OPTION FROM MENU 
BIT FLAGS 
ON IF SPF DATASET 
GENERATE MENU INDICATOR 
ERROR INDICATOR 
RENAME FLAG (FOR UAC) 
CML REQUEST (FOR UDMS) 
ALARM FOR '0'X MSG 
%% RESERVED x 
*#% RESERVED ®% 
RENAME FIELD FROM MENU 
PARM NR OF MEMBER NAME 
PARM NR OF DATASET NAME 
"TEBCOPY" (FOR UDZ) 
UDM/UDMS VALUES 
“"PPRINTED" 
“RRENAMED" 
“DDELETED" 
mB at 
COUNT OF PRINTED MEMS 
COUNT OF RENAMED MEMS 
COUNT OF DELETED MEMS 
PTR TO OUTFUT TFD 
CBR BORK AREA PTR 
*% RESERVED *% 
*#% RESERVED ** 
*%% RESERVED ** 
*% RESERVED 
## RESERVED %% 


OFFSET FIELD 
DEC HEX NAME 
0 0 1 UDACOMM BASED 
BOUNDARY( WORD ); 
0 0 2 UDACIVCP PTR(31), 
4 4 2 UDAMENUP PTR(31)> 
& & 2 UDAMID CHAR(4), 
12 Cc 2 UDAMCL FIXED(31); 
16 810 2 UDAP, 
16 10 3 UDAPI CHAR(80), 
96 § 60 3 UDAP2 CHAR( 80), 
176 ~=6B0 3 UDAP3 CHAR( 80), 
256 100 2 UDAOPT CHAR(1), 
257 101 2 UDABITS BIT(8), 
257 101.0 3 UDASPF BIT(1)> 
257 101.1 3 UDARGN BIT(1), 
257 101.2 3 UDAERR BIT(1), 
257 101.3 3 UDARN BIT(1), 
257 101.4 3 UDACML BIT(I1), 
257 101.5 3 UDAALARM BIT(1)> 
257 101.6 3 # BIT(2), 
258 102 2 * CHAR(2)> 
260 104 2 UDAREN' CHAR(8), 
268 10C 2 UDAMEM# FIXED(31), 
272 110 2 UDADSNS FIXED(31), 
276 114 2 UDAZPGM CHAR(8), 
284 11C 2%, 
284 11C 3 UDACP CHAR(8), 
292 124 3 UDACR CHAR(8), 
300 12C 3 UDACD CHAR(8), 
308 134 3 UDACB CHAR(8), 
316 =13C 3 UDAPCT FIXED(31), 
320 140 3 UDARCT FIXED(31)> 
32% 144 3 UDADCT FIXED(31), 
328 148 3 UDAOTFDP PTR(31)> 
332 14C 3 UDACBRP PTR(31), 
336 6150 3 * FIXED(31);, 
340 154 2 * FIXED(31)> 
344 «6158 a * FIXED( 31), 
348 15C 2 * FIXED(31), 
352 160 2 * FIXED(31); 
/* NOTES: 
7* 1. IF UDAMID = '0'X THEN 
/* UDAP1 = SHORT MSG, UDAP2 = LOGN MSG, 
/* UDAP3(1:8) = TUT HELP MENU, AND 
/* UDAALARM = ALARM STATE 


LICENSED MATERIAL - PROPERTY OF IBM 


DATA AREAS 


*/ 
*/ 
*/ 
%/ 
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%/ 
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%/ 
*/ 
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%/ 
*/ 
%/ 
*/ 
%/ 
*/ 
*/ 
%/ 
%/ 
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*/ 
%/ 
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%/ 
*/ 
%/ 
*/ 
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ENG/DEG LOGIC AND SHARED BDASD SUPPORT 


PASSWORD PROTECT DATASET 


IT IS NOT RECOMMENDED THAT PASSWORD PROTECTED DATASETS BE PLACED ON 
SHARED DASD VOLUMES. SPF USERS UPDATING PASSWORD PROTECTED DATASETS 
ON SHARED DASD SHOULD BE CAUTIONED TO FILL IN THE PASSWORD FIELD ON 
THE SPF MENU TO AVOID BEING PROMPTED FOR A PASSWORD BY OPEN SINCE THE 
VOLUME IS RESERVED DURING OPEN PROCESSING. 


DATA SET INTEGRITY ENQUE 


THE SPF EDITOR, LIBRARY UTILITY, MOVE/COPY UTILITY, AND RESET STATISTICS 
UTILITY ALLOCATE PARTITIONED DATA SETS FOR "SHARED" USE EVEN THOUGH THE 
DATA SET MAY BE MODIFIED (BY ADDING, REPLACING, RENAMING, OR DELETING 
MEMBERS). THIS ALLOWS MORE THAN ONE SPF USER TO MODIFY OTHER MEMBERS IN 
THE SAME DATA SET WITHOUT TYING UP THE ENTIRE DATA SET. 


TO ENSURE THAT DATA SET INTEGRITY IS MAINTAINED, SPF ISSUES RESERVE/DEQ 
MACROS AT THE APPROPRIATE TIME. THE RESERVE MACRO PREVENTS SHARED DASD 
CONFLICTS IN ACCESSING THE VOLUME AND ALSO CAUSES AN ENQ T@ BE ISSUED. 
THIS IS AN UNCONDITIONAL ENQ; IF THE RESOURCE IS IN USE SPF IS PLACED 
IN THE WAIT STATE UNTIL IT IS FREED. THE DEQ MACRO DEQUEUES THE 
RESOURCE AND ALSO CAUSES THE VOLUME TO BE RELEASED CIF IT IS A SHARED 
VOLUME). THE DATA SET INTEGRITY ENQUE IS DONE BY SPF OBJECT MODULES 
CRESV AND CRELS. 


THE SEQUENCE OF EVENTS IS: 


ISSUE SPFDSN RESERVE 

ISSUE LINK EDITOR RESERVE OR ENQUE IF LOAD MODULE 
OPEN DATA SET FOR OUTPUT 
WRITE THE MEMBER CFOR ADD OR REPLACE MEMBER) 
ISSUE STOW MACRO CADD, REPLACE, RENAME, OR DELETE) 
CLOSE THE OUTPUT DCB 

ISSUE SPFDSN DEQ 

ISSUE LINK EDITOR DEQ IF LOAD MODULE 


THE RESERVE MACRO PARAMETERS FOR THE SPFDSN ENQUE ARE: 


TYPE = SYSTEMS RESERVE 

QNAME = 'SPFDSN '" 

RNAME = DATA SET NAME RIGHT-PADDED WITH BLANKS 
RNAME LENGTH = 44 


THE LINK EDITOR ENQUE IS ISSUED ONLY FOR RECORD FORMAT U DATASETS. 


IF THE VOLUME IS A SHARED DASD VOLUME: 

TYPE = SYSTEMS RESERVE 

QNAME: "SYSIEWLP’ 

RNAME=: DATA SET NAME RIGHT PADDED WITH BLANKS 
RNAME LENGTH: 44 


IF THE VOLUME IS NOT A SHARED DASD VOLUME: 
TYPE = SYSTEM EN@ 

QNAME: "SYSTEWLP’ 

RNAME: DATA SET NAME RIGHT PADDED WITH BLANKS 
RNAME LENGTH: 44 


CCONTINUED ON NEXT PAGE) 


356 SPF/TSO PROGRAM LOGIC MANUAL LICENSED MATERIAL - PROPERTY OF IBM 


es ee Se 


APPENDIX A. SYSTEM INTERFACE NOTES 


SESSION MANAGER INTERFACE 


MODULES SPFSC93X AND SPFSC94X ARE SPF EXIT ROUTINES FOR SVC 93 
C(IGC0009C) AND SVC 94 CIGCO009D). THE SESSION MANAGER EXIT ROUTINES 
IKTTMPX1 AND IKTTMPX2 REFERENCE THESE MODULES. THE SPF EXITS PROVIDE A 
BETTER INTERFACE BETWEEN SPF AND THE SESSION MANAGER, BUT ARE NOT 
REQUIRED TO OPERATE SPF WITH THE SESSION MANAGER. THE SPF EXITS ARE 
FUNCTIONLESS IF THE SESSION MANAGER IS NOT INSTALLED. 


REFER TO THE INSTALLATION AND CUSTOMIZATION MANUAL FOR INFORMATION ON 
THE INSTALLATION OF THESE MODULES. REFER TO THE MODULE DESCRIPTIONS AND 
THE MICROFICHE OF "SPFSC93X" AND "SPFSC94X" FOR A DETAILED DESCRIPTION 
OF THEIR OPERATION. 


THE SESSION MANAGER PROGRAM NUMBER IS 5740-XE2. 


PROGRAM CONTROL ILIT PCE) INTERFACE 


PCF COMMAND AUTHORIZATION 


SPF SUPPORTS PCF COMMAND AUTHORIZATION BY INTERFACING WITH PCF VIA 
"IKJSCAN". BEFORE CALLING "IKJSCAN", SPF PLACES 'SPF* IN THE PRIMARY 
COMMAND FIELD OF THE ECT CENVIRONMENTAL CONTROL TABLE). THIS INDICATES 
TO PCF THAT THE COMMAND BEING SCANNED IS NOT A SUBCOMMAND AND COMMAND 
AUTHORIZATION SHOULD BE PERFORMED. IF "IKJSCAN™ RETURNS WITH RC=52 
CINDICATING THE USER IS NOT AUTHORIZED TO USE THE COMMAND), THEN SPF 
DISPLAYS AN ERROR MESSAGE. 


PCF DATA SET AUTHORIZATION 


PCF DATA SET "READ ONLY™ AUTHORIZATION IS BASED ON THE ASSUMPTION THAT 
PROGRAMS WISHING TO UPDATE A DATA SET WILL FIRST ALLOCATE THE DATA SET 
WITH DISPOSITION "OLD". HOWEVER, THE SPF EDITOR, LIBRARY UTILITY, 
MOVE/COPY UTILITY, AND RESET STATISTICS UTILITY ALLOCATE PARTITIONED 
DATA SETS WITH DISPOSITION "SHARE" AND THEN ISSUES A “RESERVE™ TO SERIAL 
THE UPDATING OF THE MEMBERS. 


IN ORDER TO INFORM PCF THAT A “SHARE” ALLOCATION IS BEING DONE FOR 
UPDATING PURPOSES, SPF SETS THE FIRST BYTE OF THE ECTSCMD FIELD IN THE 
ECT TO 'O1'X. PCF TESTS FOR THIS FLAG AND PERFORMS THE AUTHORIZATION 
CHECK AS IF THE DATA SET WERE ALLOCATED "OLD". 


PCF*S PROGRAM NUMBER IS 5798-CLW. 


HIERACHICAL STCRAGE MANAGER CHSM) INTERFACE 


FOR SPF TO ALLOCATE A CATALOGED DATA SET IT ISSUES A LOCATE SYSTEM 
SERVICE. IF THE DATA SET IS UNDER HSM CONTROL, THE VOLUME "MIGRAT® IS 
NORMALLY RETURNED. IN ORDER TO CAUSE A “RECALL” AND GET THE REAL VOLUME 
SERIAL, SPF SETS THE THIRD BIT IN THE THIRD BYTE (CAMOPTN3) OF THE 
PARAMETER LIST CCAMLST) PASSED TO LOCATE (CDIAGRAMMED BELOW). THIS IS 
DONE FOR ALL SPF ISSUED LOCATES, WHETHER OR NOT HSM IS INSTALLED. 


HSM'S PROGRAM NUMBER IS 5740-XRB. 


THIS BYTE 
REGISTER 1 CAMLST 
THIS BIT 
XX XX XX XX >| xXx | xXx | xx | Xxx 
ae XX1X XXXX 
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ENQ/DEQ LOGIC AND SHARED DASD SUPPORT (CONTINUED ) 


SPF_ EDITOR MEMBER NAME ENQ 


THE SPF EDITOR ISSUES ANOTHER ENQ WHEN DATA IS SELECTED FOR EDITING TO 
DETECT WHETHER ANOTHER USER IS CURRENTLY EDITING THE SAME PDS MEMBER. 

IN THIS CASE, IT IS A CONDITIONAL ENQ. IF THE MEMBER IS BEING EDITED BY 
ANOTHER USER, A MESSAGE IS DISPLAYED. OTHERWISE, THE MEMBER IS FETCHED 
FOR EDITING. THE CORRESPONDING DEQ IS ISSUED WHEN THE USER ENDS COR 


CANCELS) THE EDIT SESSION. 
FOR THIS CASE, THE ENQ/DEQ PARAMETERS ARE: 


TYPE = SYSTEM EN@ 
QNAME = 'SPFDSN ‘° 


RNAME CFIRST 44 CHARACTERS) = FULLY QUALIFIED DATA SET NAME, 
RIGHT-PADDED WITH BLANKS 
RNAME (NEXT 8&8 CHARACTERS) = MEMBER NAME CBLANKS IF RECFM=P9S) 


RNAME LENGTH = 52 


NOTE THAT THIS ENQ/DEQ CANNOT DETECT ANOTHER USER ON A DIFFERENT CPU 


WHO MAY BE EDITING THE SAME MEMBER VIA SHARED DASD. 


LICENSED MATERIAL - PROPERTY OF IBM 


APPENDIX A 3557 


TSO/TCAM INTERFACE (CONTINUED) 


IN ADDITION TO USING THESE SIGNAL STRINGS TO DISTINGUISH SPF-GENERATED 
OUTPUT, THE MESSAGE HANDLER MACROS RESET THE TSO/TCAM LINE COUNT 
WHENEVER A SIGNAL STRING IS ENCOUNTERED, AS FOLLOWS: 


FOR SIGNAL STRING CA) THE LINE COUNT IS SET TO 2. THIS CAUSES 
ANY SUBSEQUENT LINE MESSAGE (SUCH AS A BROADCAST) TO BE DISPLAYED 
ON LINE 3 OF THE SCREEN. 


FOR SIGNAL STRING (B) THE LINE COUNT IS SET TO THE POSITION 
INDICATED BY THE SECOND SBA (XXXX). THIS ALLOWS SPF TO CONTROL 
THE STARTING LOCATION FOR SUBSEQUENT LINE MESSAGES, SUCH AS A 
"SUBMIT’ COMMAND CONFIRMATION MESSAGE OR THE BEGINNING OF A 
FOREGROUND PROCESSING SESSION. 


THE SPF MESSAGE HANDLER MACROS USE THE IEDQFSCR OPTION BYTE TO KEEP 
TRACK OF THE MESSAGE SEQUENCE. 


IEDQFSCR BITS MEANING 
eds bees RESERVED FOR USE BY TSO FULLSCR MACRO 
se Leas EXPFLS REDISPLAY FLAG 
mp ee EXPFLS BROADCAST FLAG 
eee EXPFLS FULL SCREEN FLAG 
6. Siete RESERVED FOR USE BY TSO FULLSCR MACRO 


THE OPTION BYTE MUST BE INITIALIZED TO ZERO IN THE ASSSEMBLY OF THE 
TCAM MCP. 


TSO/VTAM_ INTERFACE 


THE FOLLOWING IS A DESCRIPTION OF TSO/VTAM SYSTEM SERVICES THAT ARE USED 
TO RUN SPF ON A TSO/VTAM SYSTEM. REFER TO THE INSTALLATION AND 
CUSTOMIZATION GUIDE FOR INFORMATION ON INSTALLATION CONSIDERATIONS. 


THE NON-SPF-GENERATED MESSAGE SITUATION, DESCRIBED IN THE TSO/TCAM 
INTERFACE NOTES, IS GENERALLY HANDLED BY TSO/VTAM. THERE ARE NO 
TERMINAL ACCESS METHOD MODIFICATIONS THAT MUST BE MADE AS IN TSO/TCAM. 
HOWEVER, SPF MUST SIGNAL TSO/VTAM WHEN SPF ENTERS OR LEAVES FULL SCREEN 
MODE. 


MODULE SMI ISSUES A "STFSMODE ON,INITIAL=YES" SYSTEM SERVICE BEFORE THE 
FIRST SPF FULL SCREEN TPUT. THIS SYSTEM SERVICE IS ALSO USED TO 
DETERMINE THE TERMINAL ACCESS METHOD. A NON-ZERO RETURN CODE INDICATES 
THAT SPF IS RUNNING UNDER TSO/TCAM. 


WHEN AN SPF MODULE WANTS TO ENTER NORMAL TSO LINE I70 MODE, CONTROL 
FIRST PASSES TO MODULE SML. IT ISSUES THE "STLINENO MODE=OFF,LINENO=XX" 
SYSTEM SERVICE TO SET THE LINE NUMBER. THE REQUESTING MODULE THEN CAN 
ISSUE LINE I70 TPUTS AND TGETS TO THE TERMINAL (COR ATTACH A PROGRAM THAT 
DOES). WHEN THE MODULE WANTS TO RETURN TO SPF FULL SCREEN OPERATIONS, 
ALL IT HAS TO DO IS REQUEST A FULL SCREEN OUTPUT IN ITS NORMAL WAY CCALL 
TO SUBROUTINE MHA OR CDISPL). MODULE SMC WILL GET CONTROL AND ISSUE A 
FULL SCREEN TPUT. THIS WILL CAUSE TSO/VTAM TO GENERATE A SIMULATED PA2 
INTERRUPT. A PA2 INTERRUPT IS HANDLED BY SMC BY FIRST ISSUING A 
"STFSMODE ON” SYSTEM SERVICE AND THEN REDISPLAYING THE COMPLETE SCREEN. 


FINAL TERMINATION (MODULE PFT) ISSUES A “STFSMODE OFF” SYSTEM SERVICE. 
A MAJOR OPERATING DIFFERENCE BETWEEN TSO/VTAM AND TSO/TCAM IS WHEN A 
NON-SPF-GENERATED MESSAGE IS SENT TO THE DISPLAY, TSO/VTAM CLEARS THE 


SCREEN BEFORE DISPLAYING THE MESSAGE IF THE FULL SCREEN MODE HAS NOT 
BEEN TURNED OFF BY A “STFSMODE” OR “STLINENO” SYSTEM SERVICE. 
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APPENDIX B. TERMINAL I/0 NOTES 


TSO/TCAM INTERFACE 


THE FOLLOWING IS A DESCRIPTION OF MODIFICATIONS TO THE TSO/TCAM MESSAGE 
HANDLER THAT ARE REQUIRED TO RUN SPF ON A TSO/TCAM SYSTEM. REFER TO THE 
INSTALLATION AND CUSTOMIZATION GUIDE FOR INFORMATION ON THE INSTALLATION 
OF THESE MODIFICATIONS. 


DURING OPERATION OF SPF, CERTAIN NON-SPF-GENERATED MESSAGES MAY BE SENT 
TO THE TERMINAL, SUCH AS BROADCAST MESSAGES FROM THE SYSTEM OPERATOR OR 
OTHER TSO USERS. THESE MESSAGES WILL BE QUEUED BY TCAM AND DISPLAYED 
WHEN THE USER HITS AN INTERRUPT KEY, SUCH AS “ENTER” OR ONE OF THE PF 
KEYS. THAT SAME INTERRUPT, HOWEVER, WILL GENERALLY CAUSE SPF TO 
GENERATE FULL SCREEN OUTPUT. UNLESS INTERCEPTED, THAT OUTPUT WILL BE 
oe eace THE TERMINAL, CAUSING AN IMMEDIATE OVERLAY OF THE BROADCAST 
MESSAGE. 


THE SPF MODIFICATIONS TO THE STANDARD TSO/TCAM MESSAGE HANDLER ARE 
DESIGNED TO CORRECT THIS PROBLEM. WHEN SPF FULL SCREEN OUTPUT I5 
FOLLOWED BY NON-SPF LINE OUTPUT: 


1. THE LINE MESSAGE IS DISPLAYED WITH HIGH INTENSITY, AND THE 
AUDIBLE ALARM IS SOUNDED (IF INSTALLED). 


2. A SIMULATED ATTENTION CSIMATTN) IS GENERATED. THIS CAUSES 
THREE ASTERISKS (%*®*®) TO BE DISPLAYED ON THE BOTTOM LINE OF 
SCREEN, AND PREVENTS FURTHER QUTPUT FROM BEING SENT TO THE 
TERMINAL UNTIL THE USER HITS AN INTERRUPT KEY. 


3. WHEN SPF FULL SCREEN OUTPUT FOLLOWS THE LINE MESSAGE, A 
SIMULATED PA2 INTERRUPT IS GENERATED. THIS CAUSES SPF TO RE- 
DISPLAY TRE ENTIRE SCREEN CONTENTS. (SINCE SPF DOES NOT KNOW 
ABOUT THE LINE MESSAGE, A GARBLED SCREEN MAY RESULT UNTIL THE 
REDISPLAY OCCURS.) 


THE FULLSCR EXPFLS=YES OR THE SPFSCRN AND SPFMCHK MESSAGE HANDLER MACROS 
PROVIDE THE PROGRAM LOGIC FOR THESE FUNCTIONS. THESE MACROS GENERATE 
CODE THAT IS ABLE TO DISTINGUISH SPF-GENERATED OUTPUT FROM 
NON-SPF-GENERATED OUTPUT. THIS IS DONE BY MEANS OF A "SIGNAL STRING" 
WHICH BEGINS EVERY SPF-GENERATED FULL SCREEN OUTPUT MESSAGE. 


THERE ARE TWO TYPES OF SPF SIGNAL STRINGS: 
A. SPF FULL SCREEN SIGNAL STRING: 


HEX ‘ll SD7F 11 XXXX ........ , 
B. SPF EXIT FULL SCREEN SIGNAL STRING: 
HEX ‘11 5D7E 11 XXXX ........ ; 


WHERE: ‘THE HEX 11°S ARE 3270 SET BUFFER ADDRESS (SBA) ORDERS, 
THE HEX 5D7F REPRESENTS SCREEN LOCATION 1919 (DECIMAL), 
THE HEX 5D7E REPRESENTS SCREEN LOCATION 1918 (DECIMAL), AND 
XXXX REPRESENTS THE ACTUAL BUFFER ADDRESS DESIRED BY SPF. 


SINCE TWO SBA'S IN A ROW IS A VALID BUT MEANINGLESS SEQUENCE, IT IS 
ASSUMED THAT NON-SPF-GENERATED MESSAGES WILL NOT CONTAIN EITHER OF 
THESE SIGNAL STRINGS. 


CCONTINUED ON NEXT PAGE) 
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| TERMINAL INPUT/CUTPUT ERROR CODES 


| THE MODULE SMC IS RESPONSIBLE FOR MOST TERMINAL I/70 DONE BY SPF. IT 
USES THE COMMON SUBROUTINES CTPUT AND CTGET, WHICH IN TURN ISSUE TPUT 
AND TGET SYSTEM SERVICE REQUESTS. THE TPUT AND TGET RETURN CODES ARE 
CHECKED AND THE TGET INPUT DATA IS VERIFIED BY SMC. IF AN ERROR IS 
DETECTED, SMC SENDS A MESSAGE ALONG WITH CODES TO THE DISPLAY. 


| THE FOLLOWING IS A LIST SMC TERMINAL I/0 ERROR MESSAGES AND CODES. 


1. ™*% SPF SCREEN OUTPUT ERROR - CODE = 41 - TPUT RC = XXXX xX", 
WHERE "XXXX" IS A TPUT RETURN CODE OTHER THAN O OR 8. 


| 2. ™¥%*® SPF SCREEN INPUT ERROR - CODE = 21 - TGET RC = XXXX x", 
WHERE "XXXX" IS A TGET RETURN CODE OTHER THAN 0, 4, OR 8. 


3. ™*% SPF SCREEN INPUT ERROR - CODE = NN Xx", 
WHERE "NN" VALUES ARE: 

"22" —- INPUT STREAM SIZE GREATER THAN INPUT BUFFER SIZE OR O. 

"24" - INVALID INPUT AID. 

"25" - INPUT CURSOR LOCATION NOT WITHIN PHYSICAL SCREEN. 

"26" - INPUT STREAM SIZE INVALID FOR INPUT AID. 

"28" —- INPUT BUFFER FIELD SIZE GREATER THAN CORRESPONDING PHYSICAL 
SCREEN FIELD SIZE CINVALID AMOUNT OF INPUT DATA). 

"29" - 1ST BYTE OF INPUT BUFFER FIELD NOT WITHIN EITHER LOGICAL 
SCREEN WHICH IS ON THE PHYSICAL SCREEN CINPUT DATA FROM 
INVALID SCREEN POSITION). 

"ZA" = rn ae OF INPUT BUFFER FIELD NOT AN SBA CINVALID INPUT 

ATA). 

"31" - PHYSICAL SCREEN FIELD SIZE GREATER THAN 255 CINPUT DATA FROM 

| INVALID SCREEN POSITION). 

"32" - PHYSICAL SCREEN FIELD SIZE IS 0 CINPUT DATA FROM INVALID 
SCREEN POSITION). 

"33" - BYTE PRECEEDING THE PHYSICAL SCREEN FIELD IS NOT AN INPUT 
ATTRIBUTE CINPUT DATA FROM INVALID SCREEN POSITION). 

"34" - BYTE PRECEEDING THE PHYSICAL SCREEN FIELD IS PAST THE END OF 
THE PHYSICAL SCREEN CINPUT DATA FROM INVALID SCREEN 
POSITION). 

"38" - INPUT BUFFER FIELD SIZE GREATER THAN 255 CINVALID AMOUNT OF 

- INPUT DATA). 
NOTES: THE PHYSICAL SCREEN SIZE IS DETERMINED BY SPF DURING 

INITIALIZATION. THE INPUT BUFFER SIZE IS A VARIABLE BASED 
ON THE PHYSICAL SCREEN SIZE. THE LOGICAL SCREEN IS THE 
SAME SIZE AS THE PHYSICAL SCREEN AND IT IS WHAT THE 
PROCESSOR TASK USES FOR SCREEN I/Q. ONLY A PART OF THE 
LOGICAL SCREEN IS ON THE PHYSICAL SCREEN WHEN SPF IS 
RUNNING IN SPLIT SCREEN MODE. A INPUT BUFFER FIELD IS FROM 
AN SBA TO THE NEXT SBA OR THE END. A PHYSICAL SCREEN FIELD 

IS FROM THE LOCATION INDICATED IN THE INPUT BUFFER SBA TO 

THE NEXT ATTRIBUTE BYTE IN THE PHYSICAL SCREEN. 
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| ABEND CODES 


ABENDS OF THE SPF CONTROLLER AND PROCESSOR TASKS ARE CONTROLLED BY STAE 
AND STAI EXIT ROUTINES AND SPF EXECUTION MODES WHICH ARE SET VIA THE 
"SPF TEST™ COMMAND (SEE THE INSTALLATION AND CUSTOMIZATION GUIDE). 


UNDER NORMAL SITUATIONS CWHEN PROCESSOR AND CONTROLLER DUMPS ARE NOT 
REQUESTED VIA THE "SPF TEST” COMMAND) THE FOLLOWING OCCURS: 

- WHEN A PROCESSOR TASK ABENDS, NO DUMP IS TAKEN, THE CONTROLLER 
REATTACHES THE PROCESSOR MAIN DRIVER CSPFPMD), AND THE PRIMARY 
OPTION MENU IS REDISPLAYED FOR THAT LOGICAL SCREEN. 

- WHEN THE CONTROLLER TASK ABENDS, NO DUMP IS TAKEN, SPF TERMINATES, 
AND CONTROL RETURNS TO TSO. 


THE CONTROLLER AND PROCESSOR TASKS WILL ISSUE THE ABEND SYSTEM SERVICE 
AND ALLOW DUMPS UNDER CERTAIN SITUATIONS. THE SPF MODULES THAT ISSUE 
THE ABEND AND THE ASSOCIATED CODES AND REASONS FOLLOW: 


CDISPL ~ USER CODE = "111" OR "222" - TO PRODUCE THESE ABENDS THE 
USER MUST REQUEST PROCESSOR DUMPS VIA THE “SPF TEST" 
COMMAND AND ENTER ONE OF THE FOLLOWING COMMANDS IN THE 
FIRST 8 BYTES OF THE FIRST INPUT FIELD ON A LOGICAL SCREEN. 
"ABEND" - TERMINATES SPF WITH CODE "111". 
"CRASH™ - TERMINATES SPF WITH CODE "222" AND PREVENTS 
TASK TERMINATION FROM CLOSING THE EDIT 
BACKUP/RECOVERY DATA SETS. 


MHA ~ USER CODE = "998" - THIS ABEND IS USED BY MHA TO PASS 
CONTROL TO THE CONTROLLER TASK WHEN MHA IS UNABLE TO 
DISPLAY THE MENU REQUESTED BY THE PROCESSOR TASK. THE 
CONTROLLER REATTACHES SPFPMD AND THE PRIMARY OPTION MENU IS 
REDISPLAYED FOR THAT LOGICAL SCREEN. 


SMA - THERE ARE TWO USER ABENDS POSSIBLE FROM SMA AS FOLLOWS: 

1. USER CODE = PROCESSOR ABEND CODE OR ATTACH RETURN CODE - 
THIS ABEND IS ISSUED WHEN THE ATTACH OF SPFPMD FAILS OR 
SPFPMD ABENDS BEFORE THE PRIMARY OPTION MENU IS 
DISPLAYED IN THE FOLLOWING SITUATIONS:. 

A. FOR THE FIRST LOGICAL SCREEN - ALWAYS. 

B. FOR THE SECOND LOGICAL SCREEN - WHEN THEN THE USER 
HAS REQUESTED PROCESSOR DUMPS VIA THE "SPF TEST" 
COMMAND. NORMALLY, FOR THIS SITUATION, ONLY MESSAGES 
ARE DISPLAYED ON THE FIRST LOGICAL SCREEN. 

2. USER CODE = PROCESSOR ABEND CODE - THIS ABEND IS ISSUED 
WHEN THE PROCESSOR TASK ABENDS AS FOLLOWS: 

A. ANYTIME AFTER THE PRIMARY OPTION MENU IS DISPLAYED IF 
THE USER HAS REQUESTED CONTROLLER DUMPS VIA THE "SPF 
TEST’ COMMAND. NORMALLY, THE CONTROLLER REATTACHES 
SPFPMD AND THE PRIMARY OPTION MENU IS REDISPLAYED FOR 
THAT LOGICAL SCREEN. 

B. ANYTIME AFTER THE FINAL TERMINATION PROCESS BEGINS. 


SMC - USER CODE = "997" - WHEN SMC DETECTS A TPUT RETURN CODES 
OTHER THAN 0 OR 8, A MESSAGE WILL BE DISPLAYED (DESCRIBED 
IN THE TERMINAL I/O ERROR CODES), AND THEN SMC WILL ATTEMPT 
A FULL SCREEN REDISPLAY. IF THE REDISPLAY FAILS TWICE THIS 
ABEND WILL BE ISSUED. 


OTHERS - SYSTEM CODE = "O0C1™" - IN SEVERAL SPF COMMON SUBROUTINES 
PARAMETER VERIFICATION FAILURE WILL RESULT IN THE EXECUTION 
OF A "O0"X, WHICH IN TURN CAUSES AN "OCI" ABEND. THIS 
INDICATES THE CALLER HAS PASSED AN INVALID VALUE FOR A 
PARAMETER WHICH IS REQUIRED FOR CONTINUED EXECUTION. THIS 
SHOULD NEVER OCCUR IN THE DISTRIBUTED SYSTEM. 
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